1st Multimedia Mac Shareware

home *** CD-ROM | disk | FTP | other *** search
/ 1st Multimedia Mac Shareware / Multimedia Shareware CD-ROM - BetaCorp.iso / Personal / Keep In Touch / Date Book < prev next >
MacBinary | 1992-08-10 | 49.3 KB | [STAK/WILD]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`100%`	dexvert	HyperCard Stack `(archive/hypercard)`	idMeta	Supported
`1%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`100%`	file	MacBinary II, inited, Wed Mar 22 07:33:43 1989, modified Mon Aug 10 05:02:59 1992, creator HyperCard, type HyperCard stack, 49152 bytes "Date Book" , at 0xc080 1113 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Mac HyperCard stack (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	dearkID	deark: macbinary	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[STAK]`
macFileCreator	`[WILD]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 09 44 61 74 65 20 42 | 6f 6f 6b 00 00 00 00 00 |..Date B|ook.....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 53 54 41 4b 57 49 4c | 44 01 00 00 00 00 00 00 |.STAKWIL|D.......|
|00000050| 00 00 00 00 00 c0 00 00 | 00 04 59 a0 4d 43 27 a6 |........|..Y.MC'.|
|00000060| ab e1 43 00 00 06 00 00 | 00 00 00 00 00 00 00 00 |..C.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 88 a6 00 00 |........|........|
|00000080| 00 00 10 00 53 54 41 4b | ff ff ff ff 00 00 00 00 |....STAK|........|
|00000090| 00 00 00 0a 00 00 c0 00 | 00 00 10 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 02 | 00 00 0a f0 00 00 00 1c |........|........|
|000000b0| 00 00 0d b9 00 00 08 b6 | 00 00 00 01 00 00 19 a0 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 05 00 00 10 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 01 22 80 00 02 10 80 00 | 02 10 80 00 02 10 80 00 |."......|........|
|000000f0| e3 f5 2c f3 00 00 00 00 | 00 00 00 00 00 00 00 00 |..,.....|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 2b 8c 00 00 2a 69 | 00 00 00 00 00 00 00 00 |..+...*i|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|00000350| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|00000360| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|00000370| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000380| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000390| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|000003a0| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|000003b0| c4 80 0c 68 43 02 30 26 | b1 30 03 1b d8 c0 0c 8d |...hC.0&|.0......|
|000003c0| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|000003d0| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|000003e0| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|000003f0| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000400| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000410| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|00000420| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|00000430| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|00000440| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|00000450| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|00000460| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|00000470| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000480| 00 00 a6 40 00 00 19 a0 | 00 00 00 00 00 00 00 00 |...@....|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 6f 6e 20 6f 70 65 6e 53 | 74 61 63 6b 0d 67 6c 6f |on openS|tack.glo|
|00000690| 62 61 6c 20 4b 49 54 4d | 75 73 69 63 0d 69 66 20 |bal KITM|usic.if |
|000006a0| 4b 49 54 4d 75 73 69 63 | 20 69 73 20 65 6d 70 74 |KITMusic| is empt|
|000006b0| 79 20 74 68 65 6e 0d 73 | 65 74 20 6c 6f 63 6b 53 |y then.s|et lockS|
|000006c0| 63 72 65 65 6e 20 74 6f | 20 74 72 75 65 0d 70 75 |creen to| true.pu|
|000006d0| 73 68 20 63 61 72 64 0d | 67 6f 20 74 6f 20 63 61 |sh card.|go to ca|
|000006e0| 72 64 20 22 44 65 73 6b | 22 20 6f 66 20 73 74 61 |rd "Desk|" of sta|
|000006f0| 63 6b 20 22 4b 65 65 70 | 5f 69 6e 5f 54 6f 75 63 |ck "Keep|_in_Touc|
|00000700| 68 22 0d 70 75 74 20 62 | 6b 67 6e 64 20 66 69 65 |h".put b|kgnd fie|
|00000710| 6c 64 20 22 4b 49 54 4d | 75 73 69 63 22 20 69 6e |ld "KITM|usic" in|
|00000720| 74 6f 20 4b 49 54 4d 75 | 73 69 63 0d 70 6f 70 20 |to KITMu|sic.pop |
|00000730| 63 61 72 64 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |card.end| if.end |
|00000740| 6f 70 65 6e 53 74 61 63 | 6b 0d 0d 6f 6e 20 63 68 |openStac|k..on ch|
|00000750| 61 6e 67 65 43 75 72 73 | 6f 72 20 6f 70 74 69 6f |angeCurs|or optio|
|00000760| 6e 61 6c 0d 67 6c 6f 62 | 61 6c 20 63 75 72 73 4e |nal.glob|al cursN|
|00000770| 6f 77 0d 69 66 20 63 75 | 72 73 4e 6f 77 20 69 73 |ow.if cu|rsNow is|
|00000780| 20 65 6d 70 74 79 20 74 | 68 65 6e 20 70 75 74 20 | empty t|hen put |
|00000790| 30 20 69 6e 74 6f 20 63 | 75 72 73 4e 6f 77 0d 69 |0 into c|ursNow.i|
|000007a0| 66 20 6f 70 74 69 6f 6e | 61 6c 20 69 73 20 6e 6f |f option|al is no|
|000007b0| 74 20 65 6d 70 74 79 20 | 74 68 65 6e 20 70 75 74 |t empty |then put|
|000007c0| 20 6f 70 74 69 6f 6e 61 | 6c 20 69 6e 74 6f 20 63 | optiona|l into c|
|000007d0| 75 72 73 4e 6f 77 0d 65 | 6c 73 65 20 61 64 64 20 |ursNow.e|lse add |
|000007e0| 31 20 74 6f 20 63 75 72 | 73 4e 6f 77 0d 69 66 20 |1 to cur|sNow.if |
|000007f0| 63 75 72 73 4e 6f 77 20 | 3e 20 36 20 74 68 65 6e |cursNow |> 6 then|
|00000800| 20 70 75 74 20 31 20 69 | 6e 74 6f 20 63 75 72 73 | put 1 i|nto curs|
|00000810| 4e 6f 77 0d 73 65 74 20 | 63 75 72 73 6f 72 20 74 |Now.set |cursor t|
|00000820| 6f 20 28 31 35 30 30 2b | 63 75 72 73 4e 6f 77 29 |o (1500+|cursNow)|
|00000830| 0d 65 6e 64 20 63 68 61 | 6e 67 65 43 75 72 73 6f |.end cha|ngeCurso|
|00000840| 72 0d 0d 6f 6e 20 73 74 | 61 72 74 47 72 65 65 74 |r..on st|artGreet|
|00000850| 20 61 72 67 0d 67 6c 6f | 62 61 6c 20 67 72 65 65 | arg.glo|bal gree|
|00000860| 74 46 61 6d 2c 20 67 72 | 65 65 74 45 76 65 6e 74 |tFam, gr|eetEvent|
|00000870| 2c 20 67 72 65 65 74 41 | 67 65 2c 20 67 72 65 65 |, greetA|ge, gree|
|00000880| 74 47 65 6e 64 65 72 0d | 63 68 61 6e 67 65 43 75 |tGender.|changeCu|
|00000890| 72 73 6f 72 20 31 0d 73 | 65 74 20 6c 6f 63 6b 53 |rsor 1.s|et lockS|
|000008a0| 63 72 65 65 6e 20 74 6f | 20 74 72 75 65 0d 70 75 |creen to| true.pu|
|000008b0| 74 20 69 74 65 6d 20 31 | 20 6f 66 20 61 72 67 20 |t item 1| of arg |
|000008c0| 69 6e 74 6f 20 65 76 74 | 44 61 74 65 0d 70 75 74 |into evt|Date.put|
|000008d0| 20 69 74 65 6d 20 32 20 | 6f 66 20 61 72 67 20 69 | item 2 |of arg i|
|000008e0| 6e 74 6f 20 67 72 65 65 | 74 45 76 65 6e 74 0d 64 |nto gree|tEvent.d|
|000008f0| 65 6c 65 74 65 20 63 68 | 61 72 20 31 20 6f 66 20 |elete ch|ar 1 of |
|00000900| 67 72 65 65 74 45 76 65 | 6e 74 0d 64 65 6c 65 74 |greetEve|nt.delet|
|00000910| 65 20 69 74 65 6d 20 31 | 20 74 6f 20 32 20 6f 66 |e item 1| to 2 of|
|00000920| 20 61 72 67 0d 64 65 6c | 65 74 65 20 63 68 61 72 | arg.del|ete char|
|00000930| 20 31 20 6f 66 20 61 72 | 67 0d 70 75 73 68 20 63 | 1 of ar|g.push c|
|00000940| 61 72 64 0d 67 6f 20 74 | 6f 20 63 61 72 64 20 61 |ard.go t|o card a|
|00000950| 72 67 20 6f 66 20 73 74 | 61 63 6b 20 22 42 6c 61 |rg of st|ack "Bla|
|00000960| 63 6b 42 6f 6f 6b 22 0d | 69 66 20 74 68 65 20 72 |ckBook".|if the r|
|00000970| 65 73 75 6c 74 20 69 73 | 20 6e 6f 74 20 65 6d 70 |esult is| not emp|
|00000980| 74 79 20 74 68 65 6e 20 | 2d 2d 20 49 6e 64 69 76 |ty then |-- Indiv|
|00000990| 69 64 75 61 6c 20 4e 61 | 6d 65 3f 0d 67 6f 20 74 |idual Na|me?.go t|
|000009a0| 6f 20 73 74 61 63 6b 20 | 22 41 6c 62 75 6d 22 0d |o stack |"Album".|
|000009b0| 70 75 74 20 6c 61 73 74 | 20 77 6f 72 64 20 6f 66 |put last| word of|
|000009c0| 20 61 72 67 20 69 6e 74 | 6f 20 73 75 72 6e 61 6d | arg int|o surnam|
|000009d0| 65 0d 64 65 6c 65 74 65 | 20 6c 61 73 74 20 77 6f |e.delete| last wo|
|000009e0| 72 64 20 6f 66 20 61 72 | 67 0d 70 75 74 20 66 61 |rd of ar|g.put fa|
|000009f0| 6c 73 65 20 69 6e 74 6f | 20 66 6f 75 6e 64 0d 70 |lse into| found.p|
|00000a00| 75 74 20 30 20 69 6e 74 | 6f 20 6c 61 73 74 54 72 |ut 0 int|o lastTr|
|00000a10| 79 0d 66 69 6e 64 20 73 | 75 72 6e 61 6d 65 20 69 |y.find s|urname i|
|00000a20| 6e 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 22 53 |n bkgnd |field "S|
|00000a30| 75 72 6e 61 6d 65 22 0d | 69 66 20 74 68 65 20 72 |urname".|if the r|
|00000a40| 65 73 75 6c 74 20 69 73 | 20 6e 6f 74 20 65 6d 70 |esult is| not emp|
|00000a50| 74 79 20 74 68 65 6e 0d | 61 6e 73 77 65 72 20 22 |ty then.|answer "|
|00000a60| 43 61 6e 27 74 20 46 69 | 6e 64 20 22 26 61 72 67 |Can't Fi|nd "&arg|
|00000a70| 26 26 73 75 72 6e 61 6d | 65 0d 65 78 69 74 20 73 |&&surnam|e.exit s|
|00000a80| 74 61 72 74 47 72 65 65 | 74 0d 65 6e 64 20 69 66 |tartGree|t.end if|
|00000a90| 0d 63 68 61 6e 67 65 43 | 75 72 73 6f 72 20 32 0d |.changeC|ursor 2.|
|00000aa0| 72 65 70 65 61 74 20 75 | 6e 74 69 6c 20 66 6f 75 |repeat u|ntil fou|
|00000ab0| 6e 64 20 69 73 20 74 72 | 75 65 20 6f 72 20 74 68 |nd is tr|ue or th|
|00000ac0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 74 68 69 73 |e number| of this|
|00000ad0| 20 63 61 72 64 20 b2 20 | 6c 61 73 74 54 72 79 0d | card . |lastTry.|
|00000ae0| 69 66 20 61 72 67 20 63 | 6f 6e 74 61 69 6e 73 20 |if arg c|ontains |
|00000af0| 62 6b 67 6e 64 20 66 69 | 65 6c 64 20 22 4e 61 6d |bkgnd fi|eld "Nam|
|00000b00| 65 22 20 74 68 65 6e 0d | 70 75 74 20 62 6b 67 6e |e" then.|put bkgn|
|00000b10| 64 20 66 69 65 6c 64 20 | 22 42 69 72 74 68 64 61 |d field |"Birthda|
|00000b20| 79 22 20 69 6e 74 6f 20 | 62 64 61 79 0d 63 6f 6e |y" into |bday.con|
|00000b30| 76 65 72 74 20 62 64 61 | 79 20 74 6f 20 64 61 74 |vert bda|y to dat|
|00000b40| 65 49 74 65 6d 73 0d 69 | 66 20 28 69 74 65 6d 20 |eItems.i|f (item |
|00000b50| 33 20 6f 66 20 62 64 61 | 79 29 20 3d 20 65 76 74 |3 of bda|y) = evt|
|00000b60| 44 61 74 65 20 74 68 65 | 6e 0d 70 75 74 20 74 72 |Date the|n.put tr|
|00000b70| 75 65 20 69 6e 74 6f 20 | 66 6f 75 6e 64 0d 70 75 |ue into |found.pu|
|00000b80| 73 68 20 63 61 72 64 0d | 63 6c 69 63 6b 20 61 74 |sh card.|click at|
|00000b90| 20 74 68 65 20 6c 6f 63 | 20 6f 66 20 63 61 72 64 | the loc| of card|
|00000ba0| 20 62 75 74 74 6f 6e 20 | 22 46 61 6d 69 6c 79 22 | button |"Family"|
|00000bb0| 0d 70 75 74 20 62 6b 67 | 6e 64 20 66 69 65 6c 64 |.put bkg|nd field|
|00000bc0| 20 22 4e 61 6d 65 22 20 | 69 6e 74 6f 20 67 72 65 | "Name" |into gre|
|00000bd0| 65 74 66 61 6d 0d 70 6f | 70 20 63 61 72 64 0d 65 |etfam.po|p card.e|
|00000be0| 6e 64 20 69 66 0d 65 6e | 64 20 69 66 0d 70 75 74 |nd if.en|d if.put|
|00000bf0| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 74 | the num|ber of t|
|00000c00| 68 69 73 20 63 61 72 64 | 20 69 6e 74 6f 20 6c 61 |his card| into la|
|00000c10| 73 74 54 72 79 0d 66 69 | 6e 64 20 73 75 72 6e 61 |stTry.fi|nd surna|
|00000c20| 6d 65 20 69 6e 20 62 6b | 67 6e 64 20 66 69 65 6c |me in bk|gnd fiel|
|00000c30| 64 20 22 53 75 72 6e 61 | 6d 65 22 0d 69 66 20 74 |d "Surna|me".if t|
|00000c40| 68 65 20 72 65 73 75 6c | 74 20 69 73 20 6e 6f 74 |he resul|t is not|
|00000c50| 20 65 6d 70 74 79 20 74 | 68 65 6e 0d 61 6e 73 77 | empty t|hen.answ|
|00000c60| 65 72 20 22 43 61 6e 27 | 74 20 46 69 6e 64 20 22 |er "Can'|t Find "|
|00000c70| 26 61 72 67 26 26 73 75 | 72 6e 61 6d 65 0d 65 78 |&arg&&su|rname.ex|
|00000c80| 69 74 20 73 74 61 72 74 | 47 72 65 65 74 0d 65 6e |it start|Greet.en|
|00000c90| 64 20 69 66 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |d if.end| repeat.|
|00000ca0| 69 66 20 66 6f 75 6e 64 | 20 69 73 20 66 61 6c 73 |if found| is fals|
|00000cb0| 65 20 74 68 65 6e 0d 61 | 6e 73 77 65 72 20 22 43 |e then.a|nswer "C|
|00000cc0| 61 6e 27 74 20 46 69 6e | 64 20 22 26 61 72 67 26 |an't Fin|d "&arg&|
|00000cd0| 26 73 75 72 6e 61 6d 65 | 0d 65 78 69 74 20 73 74 |&surname|.exit st|
|00000ce0| 61 72 74 47 72 65 65 74 | 0d 65 6e 64 20 69 66 0d |artGreet|.end if.|
|00000cf0| 65 6c 73 65 20 2d 2d 20 | 46 61 6d 69 6c 79 20 4e |else -- |Family N|
|00000d00| 61 6d 65 20 46 6f 75 6e | 64 0d 63 68 61 6e 67 65 |ame Foun|d.change|
|00000d10| 43 75 72 73 6f 72 20 32 | 0d 70 75 74 20 61 72 67 |Cursor 2|.put arg|
|00000d20| 20 69 6e 74 6f 20 67 72 | 65 65 74 46 61 6d 0d 69 | into gr|eetFam.i|
|00000d30| 66 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |f the nu|mber of |
|00000d40| 63 61 72 64 20 62 75 74 | 74 6f 6e 73 20 b3 20 31 |card but|tons . 1|
|00000d50| 20 74 68 65 6e 0d 63 6c | 69 63 6b 20 61 74 20 74 | then.cl|ick at t|
|00000d60| 68 65 20 6c 6f 63 20 6f | 66 20 63 61 72 64 20 62 |he loc o|f card b|
|00000d70| 75 74 74 6f 6e 20 31 0d | 65 6c 73 65 0d 61 6e 73 |utton 1.|else.ans|
|00000d80| 77 65 72 20 22 4e 65 65 | 64 20 52 65 63 69 70 69 |wer "Nee|d Recipi|
|00000d90| 65 6e 74 d5 73 20 44 65 | 73 63 72 69 70 74 69 6f |ent.s De|scriptio|
|00000da0| 6e 20 74 6f 20 50 69 63 | 6b 20 43 61 72 64 22 20 |n to Pic|k Card" |
|00000db0| c2 0d 77 69 74 68 20 22 | 41 64 64 20 4d 65 6d 62 |..with "|Add Memb|
|00000dc0| 65 72 22 0d 65 78 69 74 | 20 73 74 61 72 74 47 72 |er".exit| startGr|
|00000dd0| 65 65 74 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 69 |eet.end |if.end i|
|00000de0| 66 0d 63 68 61 6e 67 65 | 43 75 72 73 6f 72 20 33 |f.change|Cursor 3|
|00000df0| 0d 70 75 74 20 62 6b 67 | 6e 64 20 66 69 65 6c 64 |.put bkg|nd field|
|00000e00| 20 22 41 67 65 22 20 69 | 6e 74 6f 20 67 72 65 65 | "Age" i|nto gree|
|00000e10| 74 41 67 65 0d 70 75 74 | 20 62 6b 67 6e 64 20 66 |tAge.put| bkgnd f|
|00000e20| 69 65 6c 64 20 22 53 65 | 78 22 20 69 6e 74 6f 20 |ield "Se|x" into |
|00000e30| 67 72 65 65 74 47 65 6e | 64 65 72 0d 69 66 20 67 |greetGen|der.if g|
|00000e40| 72 65 65 74 45 76 65 6e | 74 20 63 6f 6e 74 61 69 |reetEven|t contai|
|00000e50| 6e 73 20 22 4d 6f 74 68 | 65 72 22 20 74 68 65 6e |ns "Moth|er" then|
|00000e60| 20 70 75 74 20 22 46 65 | 6d 61 6c 65 22 20 69 6e | put "Fe|male" in|
|00000e70| 74 6f 20 67 72 65 65 74 | 47 65 6e 64 65 72 0d 69 |to greet|Gender.i|
|00000e80| 66 20 67 72 65 65 74 45 | 76 65 6e 74 20 63 6f 6e |f greetE|vent con|
|00000e90| 74 61 69 6e 73 20 22 46 | 61 74 68 65 72 22 20 74 |tains "F|ather" t|
|00000ea0| 68 65 6e 20 70 75 74 20 | 22 4d 61 6c 65 22 20 69 |hen put |"Male" i|
|00000eb0| 6e 74 6f 20 67 72 65 65 | 74 47 65 6e 64 65 72 0d |nto gree|tGender.|
|00000ec0| 76 69 73 75 61 6c 20 7a | 6f 6f 6d 20 6f 70 65 6e |visual z|oom open|
|00000ed0| 0d 67 6f 20 74 6f 20 73 | 74 61 63 6b 20 22 47 72 |.go to s|tack "Gr|
|00000ee0| 65 65 74 69 6e 67 22 0d | 73 65 74 20 6c 6f 63 6b |eeting".|set lock|
|00000ef0| 53 63 72 65 65 6e 20 74 | 6f 20 66 61 6c 73 65 0d |Screen t|o false.|
|00000f00| 67 72 65 65 74 0d 65 6e | 64 20 73 74 61 72 74 47 |greet.en|d startG|
|00000f10| 72 65 65 74 0d 00 00 00 | 00 00 00 00 00 00 00 00 |reet....|........|
|00000f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001000| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001080| 00 00 02 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00001090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010a0| 00 00 90 b6 00 00 94 99 | 00 00 d4 f0 00 05 0e 84 |........|........|
|000010b0| 00 02 cf 68 00 04 23 b9 | 00 04 28 e5 00 04 2e 70 |...h..#.|..(....p|
|000010c0| 00 04 34 eb 00 04 39 88 | 00 04 3e 21 00 04 43 26 |..4...9.|..>!..C&|
|000010d0| 00 04 48 df 00 04 4d 3b | 00 04 52 68 00 04 59 65 |..H...M;|..Rh..Ye|
|000010e0| 00 04 60 eb 00 04 67 71 | 00 04 6e 92 00 04 77 7a |..`...gq|..n...wz|
|000010f0| 00 04 80 2b 00 04 87 82 | 00 04 8e 33 00 04 95 61 |...+....|...3...a|
|00001100| 00 04 9d ae 00 04 a5 cb | 00 04 ac 9c 00 04 b3 a3 |........|........|
|00001110| 00 04 ba ef 00 04 c5 7e | 00 04 cc 33 00 04 d3 97 |.......~|...3....|
|00001120| 00 03 53 f6 00 04 1c 33 | 00 05 2e 69 00 05 2f 8c |..S....3|...i../.|
|00001130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001280| 00 00 00 80 4c 49 53 54 | 00 00 08 b6 00 00 00 00 |....LIST|........|
|00001290| 00 00 00 01 00 00 08 00 | 00 00 00 1c 00 0c 00 02 |........|........|
|000012a0| 00 02 00 03 20 00 01 4f | 00 00 00 1c 00 00 00 00 |.... ..O|........|
|000012b0| 00 00 09 99 00 1c 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001300| 00 00 08 00 50 41 47 45 | 00 00 09 99 00 00 00 00 |....PAGE|........|
|00001310| 00 00 08 b6 da d8 cc 76 | 00 00 0d b9 60 20 1a 64 |.......v|....` .d|
|00001320| 60 08 c8 00 00 00 0e e5 | 20 60 1e 64 e0 08 c8 20 |`.......| `.d... |
|00001330| 00 00 0f 70 20 60 1e 20 | a0 08 c0 20 00 00 10 eb |...p `. |... ....|
|00001340| 20 60 1e a0 e0 2c c0 20 | 00 00 11 88 20 60 12 a0 | `...,. |.... `..|
|00001350| 60 2c c0 00 00 00 12 21 | 20 60 92 a0 e0 2c c0 00 |`,.....!| `...,..|
|00001360| 00 00 13 26 20 20 92 a0 | a0 08 c0 00 00 00 14 df |...&  ..|........|
|00001370| 20 24 92 a2 a0 08 c0 04 | 00 00 15 3b 20 24 12 22 | $......|...; $."|
|00001380| 20 08 c0 04 00 00 16 68 | 20 24 12 22 21 48 c0 24 | ......h| $."!H.$|
|00001390| 00 00 17 65 20 20 12 22 | 21 48 c0 20 00 00 18 eb |...e  ."|!H. ....|
|000013a0| 20 22 52 22 61 48 d0 20 | 00 00 19 71 20 22 52 20 | "R"aH. |...q "R |
|000013b0| 60 08 d0 00 00 00 1a 92 | 20 37 52 a6 e6 fc d5 d8 |`.......| 7R.....|
|000013c0| 00 00 1b 7a 20 35 52 a6 | a6 fc d5 d8 00 00 1c 2b |...z 5R.|.......+|
|000013d0| 20 21 52 20 a4 68 f4 d0 | 00 00 1d 82 20 20 52 20 | !R .h..|....  R |
|000013e0| a0 68 f0 c0 00 00 1e 33 | 20 60 52 ea a0 68 f0 c8 |.h.....3| `R..h..|
|000013f0| 00 00 1f 61 20 60 12 ea | 6a f8 c1 c8 00 00 20 ae |...a `..|j..... .|
|00001400| 20 60 12 ea ea f8 d3 c8 | 00 00 21 cb 20 20 12 e0 | `......|..!.  ..|
|00001410| e0 08 d3 80 00 00 22 9c | 20 20 16 e0 e3 08 d3 c0 |......".|  ......|
|00001420| 00 00 23 a3 20 20 16 a0 | a3 08 d0 40 00 00 24 ef |..#.  ..|...@..$.|
|00001430| 20 61 15 f3 b7 6c f5 f0 | 00 00 25 7e 20 00 01 32 | a...l..|..%~ ..2|
|00001440| 11 00 84 00 00 00 26 33 | 20 00 01 32 11 00 84 00 |......&3| ..2....|
|00001450| 00 00 27 97 a0 7f ff ff | ff ff ff fc 00 00 0b 84 |..'.....|........|
|00001460| e0 14 54 16 62 fd 55 cc | 00 00 00 00 00 00 00 00 |..T.b.U.|........|
|00001470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001680| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001880| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001900| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b00| 00 00 3f 60 42 4b 47 44 | 00 00 0a f0 00 00 00 00 |..?`BKGD|........|
|00001b10| 00 00 0c 68 40 00 00 00 | 00 00 00 1b 00 00 28 f6 |...h@...|......(.|
|00001b20| 00 00 28 f6 00 1c 00 6d | 00 00 10 16 00 00 00 00 |..(....m|........|
|00001b30| 00 00 00 92 00 01 01 00 | 00 0f 00 00 00 3c 00 15 |........|.....<..|
|00001b40| 20 00 00 00 00 00 00 01 | 00 00 00 0c 00 00 00 10 | .......|........|
|00001b50| 4a 41 4e 00 00 6f 6e 20 | 6d 6f 75 73 65 55 70 0d |JAN..on |mouseUp.|
|00001b60| 76 69 73 75 61 6c 20 62 | 61 72 6e 20 64 6f 6f 72 |visual b|arn door|
|00001b70| 20 63 6c 6f 73 65 20 74 | 6f 20 67 72 61 79 0d 76 | close t|o gray.v|
|00001b80| 69 73 75 61 6c 20 62 61 | 72 6e 20 64 6f 6f 72 20 |isual ba|rn door |
|00001b90| 6f 70 65 6e 20 74 6f 20 | 63 61 72 64 0d 67 6f 20 |open to |card.go |
|00001ba0| 74 6f 20 63 61 72 64 20 | 31 20 6f 66 20 74 68 69 |to card |1 of thi|
|00001bb0| 73 20 73 74 61 63 6b 0d | 65 6e 64 20 6d 6f 75 73 |s stack.|end mous|
|00001bc0| 65 55 70 00 00 92 00 02 | 01 00 00 3b 00 01 00 68 |eUp.....|...;...h|
|00001bd0| 00 17 20 00 00 00 00 00 | 00 01 00 00 00 0c 00 00 |.. .....|........|
|00001be0| 00 10 46 45 42 00 00 6f | 6e 20 6d 6f 75 73 65 55 |..FEB..o|n mouseU|
|00001bf0| 70 0d 76 69 73 75 61 6c | 20 62 61 72 6e 20 64 6f |p.visual| barn do|
|00001c00| 6f 72 20 63 6c 6f 73 65 | 20 74 6f 20 67 72 61 79 |or close| to gray|
|00001c10| 0d 76 69 73 75 61 6c 20 | 62 61 72 6e 20 64 6f 6f |.visual |barn doo|
|00001c20| 72 20 6f 70 65 6e 20 74 | 6f 20 63 61 72 64 0d 67 |r open t|o card.g|
|00001c30| 6f 20 74 6f 20 63 61 72 | 64 20 33 20 6f 66 20 74 |o to car|d 3 of t|
|00001c40| 68 69 73 20 73 74 61 63 | 6b 0d 65 6e 64 20 6d 6f |his stac|k.end mo|
|00001c50| 75 73 65 55 70 00 00 92 | 00 03 01 00 00 67 00 03 |useUp...|.....g..|
|00001c60| 00 94 00 19 20 00 00 00 | 00 00 00 01 00 00 00 0c |.... ...|........|
|00001c70| 00 00 00 10 4d 41 52 00 | 00 6f 6e 20 6d 6f 75 73 |....MAR.|.on mous|
|00001c80| 65 55 70 0d 76 69 73 75 | 61 6c 20 62 61 72 6e 20 |eUp.visu|al barn |
|00001c90| 64 6f 6f 72 20 63 6c 6f | 73 65 20 74 6f 20 67 72 |door clo|se to gr|
|00001ca0| 61 79 0d 76 69 73 75 61 | 6c 20 62 61 72 6e 20 64 |ay.visua|l barn d|
|00001cb0| 6f 6f 72 20 6f 70 65 6e | 20 74 6f 20 63 61 72 64 |oor open| to card|
|00001cc0| 0d 67 6f 20 74 6f 20 63 | 61 72 64 20 35 20 6f 66 |.go to c|ard 5 of|
|00001cd0| 20 74 68 69 73 20 73 74 | 61 63 6b 0d 65 6e 64 20 | this st|ack.end |
|00001ce0| 6d 6f 75 73 65 55 70 00 | 00 92 00 04 01 00 00 93 |mouseUp.|........|
|00001cf0| 00 05 00 c0 00 1b 20 00 | 00 00 00 00 00 01 00 00 |...... .|........|
|00001d00| 00 0c 00 00 00 10 41 50 | 52 00 00 6f 6e 20 6d 6f |......AP|R..on mo|
|00001d10| 75 73 65 55 70 0d 76 69 | 73 75 61 6c 20 62 61 72 |useUp.vi|sual bar|
|00001d20| 6e 20 64 6f 6f 72 20 63 | 6c 6f 73 65 20 74 6f 20 |n door c|lose to |
|00001d30| 67 72 61 79 0d 76 69 73 | 75 61 6c 20 62 61 72 6e |gray.vis|ual barn|
|00001d40| 20 64 6f 6f 72 20 6f 70 | 65 6e 20 74 6f 20 63 61 | door op|en to ca|
|00001d50| 72 64 0d 67 6f 20 74 6f | 20 63 61 72 64 20 37 20 |rd.go to| card 7 |
|00001d60| 6f 66 20 74 68 69 73 20 | 73 74 61 63 6b 0d 65 6e |of this |stack.en|
|00001d70| 64 20 6d 6f 75 73 65 55 | 70 00 00 92 00 05 01 00 |d mouseU|p.......|
|00001d80| 00 bf 00 07 00 eb 00 1d | 20 00 00 00 00 00 00 01 |........| .......|
|00001d90| 00 00 00 0c 00 00 00 10 | 4d 41 59 00 00 6f 6e 20 |........|MAY..on |
|00001da0| 6d 6f 75 73 65 55 70 0d | 76 69 73 75 61 6c 20 62 |mouseUp.|visual b|
|00001db0| 61 72 6e 20 64 6f 6f 72 | 20 63 6c 6f 73 65 20 74 |arn door| close t|
|00001dc0| 6f 20 67 72 61 79 0d 76 | 69 73 75 61 6c 20 62 61 |o gray.v|isual ba|
|00001dd0| 72 6e 20 64 6f 6f 72 20 | 6f 70 65 6e 20 74 6f 20 |rn door |open to |
|00001de0| 63 61 72 64 0d 67 6f 20 | 74 6f 20 63 61 72 64 20 |card.go |to card |
|00001df0| 39 20 6f 66 20 74 68 69 | 73 20 73 74 61 63 6b 0d |9 of thi|s stack.|
|00001e00| 65 6e 64 20 6d 6f 75 73 | 65 55 70 00 00 94 00 06 |end mous|eUp.....|
|00001e10| 01 00 00 ea 00 09 01 16 | 00 1f 20 00 00 00 00 00 |........|.. .....|
|00001e20| 00 01 00 00 00 0c 00 00 | 00 10 4a 55 4e 00 00 6f |........|..JUN..o|
|00001e30| 6e 20 6d 6f 75 73 65 55 | 70 0d 76 69 73 75 61 6c |n mouseU|p.visual|
|00001e40| 20 62 61 72 6e 20 64 6f | 6f 72 20 63 6c 6f 73 65 | barn do|or close|
|00001e50| 20 74 6f 20 67 72 61 79 | 0d 76 69 73 75 61 6c 20 | to gray|.visual |
|00001e60| 62 61 72 6e 20 64 6f 6f | 72 20 6f 70 65 6e 20 74 |barn doo|r open t|
|00001e70| 6f 20 63 61 72 64 0d 67 | 6f 20 74 6f 20 63 61 72 |o card.g|o to car|
|00001e80| 64 20 31 31 20 6f 66 20 | 74 68 69 73 20 73 74 61 |d 11 of |this sta|
|00001e90| 63 6b 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 00 00 |ck.end m|ouseUp..|
|00001ea0| 00 94 00 07 01 00 01 16 | 00 0b 01 41 00 21 20 00 |........|...A.! .|
|00001eb0| 00 00 00 00 00 01 00 00 | 00 0c 00 00 00 10 4a 55 |........|......JU|
|00001ec0| 4c 00 00 6f 6e 20 6d 6f | 75 73 65 55 70 0d 76 69 |L..on mo|useUp.vi|
|00001ed0| 73 75 61 6c 20 62 61 72 | 6e 20 64 6f 6f 72 20 63 |sual bar|n door c|
|00001ee0| 6c 6f 73 65 20 74 6f 20 | 67 72 61 79 0d 76 69 73 |lose to |gray.vis|
|00001ef0| 75 61 6c 20 62 61 72 6e | 20 64 6f 6f 72 20 6f 70 |ual barn| door op|
|00001f00| 65 6e 20 74 6f 20 63 61 | 72 64 0d 67 6f 20 74 6f |en to ca|rd.go to|
|00001f10| 20 63 61 72 64 20 31 33 | 20 6f 66 20 74 68 69 73 | card 13| of this|
|00001f20| 20 73 74 61 63 6b 0d 65 | 6e 64 20 6d 6f 75 73 65 | stack.e|nd mouse|
|00001f30| 55 70 00 00 00 94 00 08 | 01 00 00 0f 01 e0 00 3e |Up......|.......>|
|00001f40| 01 f8 20 00 00 00 00 00 | 00 01 00 00 00 0c 00 00 |.. .....|........|
|00001f50| 00 10 41 55 47 00 00 6f | 6e 20 6d 6f 75 73 65 55 |..AUG..o|n mouseU|
|00001f60| 70 0d 76 69 73 75 61 6c | 20 62 61 72 6e 20 64 6f |p.visual| barn do|
|00001f70| 6f 72 20 63 6c 6f 73 65 | 20 74 6f 20 67 72 61 79 |or close| to gray|
|00001f80| 0d 76 69 73 75 61 6c 20 | 62 61 72 6e 20 64 6f 6f |.visual |barn doo|
|00001f90| 72 20 6f 70 65 6e 20 74 | 6f 20 63 61 72 64 0d 67 |r open t|o card.g|
|00001fa0| 6f 20 74 6f 20 63 61 72 | 64 20 31 35 20 6f 66 20 |o to car|d 15 of |
|00001fb0| 74 68 69 73 20 73 74 61 | 63 6b 0d 65 6e 64 20 6d |this sta|ck.end m|
|00001fc0| 6f 75 73 65 55 70 00 00 | 00 94 00 09 01 00 00 3d |ouseUp..|.......=|
|00001fd0| 01 e2 00 6c 01 fa 20 00 | 00 00 00 00 00 01 00 00 |...l.. .|........|
|00001fe0| 00 0c 00 00 00 10 53 45 | 50 00 00 6f 6e 20 6d 6f |......SE|P..on mo|
|00001ff0| 75 73 65 55 70 0d 76 69 | 73 75 61 6c 20 62 61 72 |useUp.vi|sual bar|
|00002000| 6e 20 64 6f 6f 72 20 63 | 6c 6f 73 65 20 74 6f 20 |n door c|lose to |
|00002010| 67 72 61 79 0d 76 69 73 | 75 61 6c 20 62 61 72 6e |gray.vis|ual barn|
|00002020| 20 64 6f 6f 72 20 6f 70 | 65 6e 20 74 6f 20 63 61 | door op|en to ca|
|00002030| 72 64 0d 67 6f 20 74 6f | 20 63 61 72 64 20 31 37 |rd.go to| card 17|
|00002040| 20 6f 66 20 74 68 69 73 | 20 73 74 61 63 6b 0d 65 | of this| stack.e|
|00002050| 6e 64 20 6d 6f 75 73 65 | 55 70 00 00 00 94 00 0a |nd mouse|Up......|
|00002060| 01 00 00 6b 01 e4 00 9a | 01 fc 20 00 00 00 00 00 |...k....|.. .....|
|00002070| 00 01 00 00 00 0c 00 00 | 00 10 4f 43 54 00 00 6f |........|..OCT..o|
|00002080| 6e 20 6d 6f 75 73 65 55 | 70 0d 76 69 73 75 61 6c |n mouseU|p.visual|
|00002090| 20 62 61 72 6e 20 64 6f | 6f 72 20 63 6c 6f 73 65 | barn do|or close|
|000020a0| 20 74 6f 20 67 72 61 79 | 0d 76 69 73 75 61 6c 20 | to gray|.visual |
|000020b0| 62 61 72 6e 20 64 6f 6f | 72 20 6f 70 65 6e 20 74 |barn doo|r open t|
|000020c0| 6f 20 63 61 72 64 0d 67 | 6f 20 74 6f 20 63 61 72 |o card.g|o to car|
|000020d0| 64 20 31 39 20 6f 66 20 | 74 68 69 73 20 73 74 61 |d 19 of |this sta|
|000020e0| 63 6b 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 00 00 |ck.end m|ouseUp..|
|000020f0| 00 94 00 0b 01 00 00 99 | 01 e6 00 c8 01 fd 20 00 |........|...... .|
|00002100| 00 00 00 00 00 01 00 00 | 00 0c 00 00 00 10 4e 4f |........|......NO|
|00002110| 56 00 00 6f 6e 20 6d 6f | 75 73 65 55 70 0d 76 69 |V..on mo|useUp.vi|
|00002120| 73 75 61 6c 20 62 61 72 | 6e 20 64 6f 6f 72 20 63 |sual bar|n door c|
|00002130| 6c 6f 73 65 20 74 6f 20 | 67 72 61 79 0d 76 69 73 |lose to |gray.vis|
|00002140| 75 61 6c 20 62 61 72 6e | 20 64 6f 6f 72 20 6f 70 |ual barn| door op|
|00002150| 65 6e 20 74 6f 20 63 61 | 72 64 0d 67 6f 20 74 6f |en to ca|rd.go to|
|00002160| 20 63 61 72 64 20 32 31 | 20 6f 66 20 74 68 69 73 | card 21| of this|
|00002170| 20 73 74 61 63 6b 0d 65 | 6e 64 20 6d 6f 75 73 65 | stack.e|nd mouse|
|00002180| 55 70 00 00 00 94 00 0c | 01 00 00 c7 01 e8 00 f6 |Up......|........|
|00002190| 01 fe 20 00 00 00 00 00 | 00 01 00 00 00 0c 00 00 |.. .....|........|
|000021a0| 00 10 44 45 43 00 00 6f | 6e 20 6d 6f 75 73 65 55 |..DEC..o|n mouseU|
|000021b0| 70 0d 76 69 73 75 61 6c | 20 62 61 72 6e 20 64 6f |p.visual| barn do|
|000021c0| 6f 72 20 63 6c 6f 73 65 | 20 74 6f 20 67 72 61 79 |or close| to gray|
|000021d0| 0d 76 69 73 75 61 6c 20 | 62 61 72 6e 20 64 6f 6f |.visual |barn doo|
|000021e0| 72 20 6f 70 65 6e 20 74 | 6f 20 63 61 72 64 0d 67 |r open t|o card.g|
|000021f0| 6f 20 74 6f 20 63 61 72 | 64 20 32 33 20 6f 66 20 |o to car|d 23 of |
|00002200| 74 68 69 73 20 73 74 61 | 63 6b 0d 65 6e 64 20 6d |this sta|ck.end m|
|00002210| 6f 75 73 65 55 70 00 00 | 00 94 00 0d 01 00 00 f5 |ouseUp..|........|
|00002220| 01 ea 01 23 02 00 20 00 | 00 00 00 00 00 01 00 00 |...#.. .|........|
|00002230| 00 0c 00 00 00 10 48 4f | 4c 00 00 6f 6e 20 6d 6f |......HO|L..on mo|
|00002240| 75 73 65 55 70 0d 76 69 | 73 75 61 6c 20 62 61 72 |useUp.vi|sual bar|
|00002250| 6e 20 64 6f 6f 72 20 63 | 6c 6f 73 65 20 74 6f 20 |n door c|lose to |
|00002260| 67 72 61 79 0d 76 69 73 | 75 61 6c 20 62 61 72 6e |gray.vis|ual barn|
|00002270| 20 64 6f 6f 72 20 6f 70 | 65 6e 20 74 6f 20 63 61 | door op|en to ca|
|00002280| 72 64 0d 67 6f 20 74 6f | 20 63 61 72 64 20 32 34 |rd.go to| card 24|
|00002290| 20 6f 66 20 74 68 69 73 | 20 73 74 61 63 6b 0d 65 | of this| stack.e|
|000022a0| 6e 64 20 6d 6f 75 73 65 | 55 70 00 00 00 26 00 1b |nd mouse|Up...&..|
|000022b0| 02 01 00 17 00 4c 00 2a | 00 e9 00 00 00 00 00 00 |.....L.*|........|
|000022c0| 00 01 00 02 00 0e 01 00 | 00 12 4d 6f 6e 74 68 00 |........|..Month.|
|000022d0| 00 00 00 22 00 1d 02 01 | 00 17 01 1c 00 2a 01 b9 |..."....|.....*..|
|000022e0| 00 00 00 00 00 00 00 01 | 00 02 00 0e 01 00 00 12 |........|........|
|000022f0| 00 00 00 00 00 96 00 1e | 01 00 01 22 01 ec 01 4f |........|..."...O|
|00002300| 02 00 20 00 00 00 00 00 | 00 01 00 00 00 0c 00 00 |.. .....|........|
|00002310| 00 10 48 6f 6c 32 00 00 | 6f 6e 20 6d 6f 75 73 65 |..Hol2..|on mouse|
|00002320| 55 70 0d 76 69 73 75 61 | 6c 20 62 61 72 6e 20 64 |Up.visua|l barn d|
|00002330| 6f 6f 72 20 63 6c 6f 73 | 65 20 74 6f 20 67 72 61 |oor clos|e to gra|
|00002340| 79 0d 76 69 73 75 61 6c | 20 62 61 72 6e 20 64 6f |y.visual| barn do|
|00002350| 6f 72 20 6f 70 65 6e 20 | 74 6f 20 63 61 72 64 0d |or open |to card.|
|00002360| 67 6f 20 74 6f 20 63 61 | 72 64 20 32 35 20 6f 66 |go to ca|rd 25 of|
|00002370| 20 74 68 69 73 20 73 74 | 61 63 6b 0d 65 6e 64 20 | this st|ack.end |
|00002380| 6d 6f 75 73 65 55 70 0d | 00 00 00 82 00 1f 01 00 |mouseUp.|........|
|00002390| 00 12 01 02 00 1f 01 13 | 20 00 00 00 40 b0 00 01 |........| ...@...|
|000023a0| 00 00 00 0c 00 00 00 10 | 4e 65 78 74 00 00 6f 6e |........|Next..on|
|000023b0| 20 6d 6f 75 73 65 55 70 | 0d 76 69 73 75 61 6c 20 | mouseUp|.visual |
|000023c0| 62 61 72 6e 20 64 6f 6f | 72 20 63 6c 6f 73 65 20 |barn doo|r close |
|000023d0| 74 6f 20 67 72 61 79 0d | 76 69 73 75 61 6c 20 62 |to gray.|visual b|
|000023e0| 61 72 6e 20 64 6f 6f 72 | 20 6f 70 65 6e 20 74 6f |arn door| open to|
|000023f0| 20 63 61 72 64 0d 67 6f | 20 6e 65 78 74 0d 65 6e | card.go| next.en|
|00002400| 64 20 6d 6f 75 73 65 55 | 70 0d 00 00 00 82 00 21 |d mouseU|p......!|
|00002410| 01 00 00 12 00 ed 00 1f | 00 ff 20 00 00 00 3c 3c |........|.. ...<<|
|00002420| 00 01 00 00 00 0c 00 00 | 00 10 50 72 65 76 00 00 |........|..Prev..|
|00002430| 6f 6e 20 6d 6f 75 73 65 | 55 70 0d 76 69 73 75 61 |on mouse|Up.visua|
|00002440| 6c 20 62 61 72 6e 20 64 | 6f 6f 72 20 63 6c 6f 73 |l barn d|oor clos|
|00002450| 65 20 74 6f 20 67 72 61 | 79 0d 76 69 73 75 61 6c |e to gra|y.visual|
|00002460| 20 62 61 72 6e 20 64 6f | 6f 72 20 6f 70 65 6e 20 | barn do|or open |
|00002470| 74 6f 20 63 61 72 64 0d | 67 6f 20 70 72 65 76 0d |to card.|go prev.|
|00002480| 65 6e 64 20 6d 6f 75 73 | 65 55 70 0d 00 00 00 64 |end mous|eUp....d|
|00002490| 00 22 01 00 00 1f 01 02 | 00 2f 01 12 20 00 00 00 |."......|./.. ...|
|000024a0| 1a 40 00 01 00 00 00 0c | 00 00 00 10 50 6f 70 00 |.@......|....Pop.|
|000024b0| 00 6f 6e 20 6d 6f 75 73 | 65 55 70 0d 76 69 73 75 |.on mous|eUp.visu|
|000024c0| 61 6c 20 62 61 72 6e 20 | 64 6f 6f 72 20 63 6c 6f |al barn |door clo|
|000024d0| 73 65 20 74 6f 20 67 72 | 61 79 0d 70 6f 70 20 63 |se to gr|ay.pop c|
|000024e0| 61 72 64 0d 65 6e 64 20 | 6d 6f 75 73 65 55 70 0d |ard.end |mouseUp.|
|000024f0| 00 00 00 d2 00 23 01 00 | 00 20 00 ee 00 2e 00 fe |.....#..|. ......|
|00002500| a0 04 00 00 00 00 00 01 | 00 00 00 0c 00 00 00 10 |........|........|
|00002510| 3f 00 00 6f 6e 20 6d 6f | 75 73 65 55 70 0d 67 6c |?..on mo|useUp.gl|
|00002520| 6f 62 61 6c 20 4b 49 54 | 4d 75 73 69 63 0d 69 66 |obal KIT|Music.if|
|00002530| 20 4b 49 54 4d 75 73 69 | 63 20 74 68 65 6e 20 70 | KITMusi|c then p|
|00002540| 6c 61 79 20 22 68 61 72 | 70 73 69 63 68 6f 72 64 |lay "har|psichord|
|00002550| 22 20 c2 0d 74 65 6d 70 | 6f 20 20 38 35 20 67 33 |" ..temp|o  85 g3|
|00002560| 65 20 67 20 67 71 20 65 | 65 20 65 20 65 71 20 67 |e g gq e|e e eq g|
|00002570| 65 20 67 20 67 71 20 66 | 20 64 68 20 61 71 2e 20 |e g gq f| dh aq. |
|00002580| 62 20 67 0d 70 75 73 68 | 20 63 61 72 64 0d 76 69 |b g.push| card.vi|
|00002590| 73 75 61 6c 20 7a 6f 6f | 6d 20 6f 70 65 6e 0d 67 |sual zoo|m open.g|
|000025a0| 6f 20 74 6f 20 63 61 72 | 64 20 22 48 45 4c 50 20 |o to car|d "HELP |
|000025b0| 43 41 52 44 22 0d 65 6e | 64 20 6d 6f 75 73 65 55 |CARD".en|d mouseU|
|000025c0| 70 0d 00 00 01 0c 00 24 | 01 00 00 0f 00 22 00 2e |p......$|....."..|
|000025d0| 00 44 20 00 00 00 77 23 | 00 01 00 00 00 0c 00 00 |.D ...w#|........|
|000025e0| 00 10 44 65 73 6b 00 00 | 6f 6e 20 6d 6f 75 73 65 |..Desk..|on mouse|
|000025f0| 55 70 0d 67 6c 6f 62 61 | 6c 20 4b 49 54 4d 75 73 |Up.globa|l KITMus|
|00002600| 69 63 0d 69 66 20 4b 49 | 54 4d 75 73 69 63 20 74 |ic.if KI|TMusic t|
|00002610| 68 65 6e 20 70 6c 61 79 | 20 22 68 61 72 70 73 69 |hen play| "harpsi|
|00002620| 63 68 6f 72 64 22 20 74 | 65 6d 70 6f 20 31 30 30 |chord" t|empo 100|
|00002630| 20 c2 0d 22 65 33 65 20 | 62 20 63 23 34 20 61 33 | .."e3e |b c#4 a3|
|00002640| 20 62 71 20 67 20 61 65 | 20 61 73 20 62 20 67 65 | bq g ae| as b ge|
|00002650| 20 66 23 65 20 65 68 22 | 0d 76 69 73 75 61 6c 20 | f#e eh"|.visual |
|00002660| 62 61 72 6e 20 64 6f 6f | 72 20 63 6c 6f 73 65 20 |barn doo|r close |
|00002670| 74 6f 20 67 72 61 79 0d | 76 69 73 75 61 6c 20 76 |to gray.|visual v|
|00002680| 65 6e 65 74 69 61 6e 20 | 62 6c 69 6e 64 73 20 74 |enetian |blinds t|
|00002690| 6f 20 63 61 72 64 0d 67 | 6f 20 74 6f 20 63 61 72 |o card.g|o to car|
|000026a0| 64 20 22 44 65 73 6b 22 | 20 6f 66 20 73 74 61 63 |d "Desk"| of stac|
|000026b0| 6b 20 22 4b 65 65 70 5f | 69 6e 5f 54 6f 75 63 68 |k "Keep_|in_Touch|
|000026c0| 22 0d 65 6e 64 20 6d 6f | 75 73 65 55 70 0d 00 00 |".end mo|useUp...|
|000026d0| 01 40 00 25 01 00 00 0f | 01 c4 00 30 01 df 20 00 |.@.%....|...0.. .|
|000026e0| 00 00 26 b9 00 01 00 00 | 00 0c 00 00 00 10 42 6c |..&.....|......Bl|
|000026f0| 61 63 6b 20 42 6f 6f 6b | 00 00 6f 6e 20 6d 6f 75 |ack Book|..on mou|
|00002700| 73 65 55 70 0d 67 6c 6f | 62 61 6c 20 4b 49 54 4d |seUp.glo|bal KITM|
|00002710| 75 73 69 63 0d 69 66 20 | 4b 49 54 4d 75 73 69 63 |usic.if |KITMusic|
|00002720| 20 74 68 65 6e 20 70 6c | 61 79 20 22 68 61 72 70 | then pl|ay "harp|
|00002730| 73 69 63 68 6f 72 64 22 | 20 74 65 6d 70 6f 20 31 |sichord"| tempo 1|
|00002740| 30 30 20 c2 0d 22 65 33 | 65 20 67 71 20 61 65 20 |00 .."e3|e gq ae |
|00002750| 62 65 2e 20 63 34 73 20 | 62 33 65 20 61 71 20 66 |be. c4s |b3e aq f|
|00002760| 23 65 20 64 65 2e 20 65 | 73 20 66 23 65 20 67 71 |#e de. e|s f#e gq|
|00002770| 20 65 65 20 65 65 2e 20 | 64 23 73 20 65 65 20 66 | ee ee. |d#s ee f|
|00002780| 23 71 20 64 23 65 20 62 | 32 77 22 0d 76 69 73 75 |#q d#e b|2w".visu|
|00002790| 61 6c 20 62 61 72 6e 20 | 64 6f 6f 72 20 63 6c 6f |al barn |door clo|
|000027a0| 73 65 20 74 6f 20 67 72 | 61 79 0d 76 69 73 75 61 |se to gr|ay.visua|
|000027b0| 6c 20 70 6c 61 69 6e 20 | 74 6f 20 62 6c 61 63 6b |l plain |to black|
|000027c0| 0d 76 69 73 75 61 6c 20 | 62 61 72 6e 20 64 6f 6f |.visual |barn doo|
|000027d0| 72 20 6f 70 65 6e 20 74 | 6f 20 63 61 72 64 0d 67 |r open t|o card.g|
|000027e0| 6f 20 74 6f 20 6d 69 64 | 20 63 61 72 64 20 6f 66 |o to mid| card of|
|000027f0| 20 73 74 61 63 6b 20 22 | 42 6c 61 63 6b 42 6f 6f | stack "|BlackBoo|
|00002800| 6b 22 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 0d 00 |k".end m|ouseUp..|
|00002810| 00 26 00 27 02 01 01 40 | 00 53 01 53 00 9e 00 04 |.&.'...@|.S.S....|
|00002820| 00 00 00 00 00 01 00 00 | 00 0c 00 00 00 10 74 6f |........|......to|
|00002830| 64 61 79 00 00 00 00 2c | 00 29 02 01 00 2f 00 2e |day....,|.).../..|
|00002840| 01 40 01 01 00 00 00 00 | 00 00 00 00 00 03 00 0a |.@......|........|
|00002850| 00 00 00 0d 4c 65 66 74 | 45 76 65 6e 74 73 00 00 |....Left|Events..|
|00002860| 00 00 00 2c 00 2a 02 01 | 00 2f 01 0e 01 40 01 e1 |...,.*..|./...@..|
|00002870| 00 00 00 00 00 00 00 00 | 00 03 00 0a 00 00 00 0d |........|........|
|00002880| 52 69 67 68 74 45 76 65 | 6e 74 73 00 00 00 00 22 |RightEve|nts...."|
|00002890| 00 6b 02 01 00 30 00 21 | 01 41 00 2f 00 00 00 00 |.k...0.!|.A./....|
|000028a0| 00 00 00 00 00 17 00 0c | 01 00 00 0d 00 00 00 00 |........|........|
|000028b0| 00 22 00 6c 02 01 00 30 | 01 01 01 41 01 0f 00 00 |.".l...0|...A....|
|000028c0| 00 00 00 00 00 00 00 17 | 00 0c 01 00 00 0d 00 00 |........|........|
|000028d0| 00 00 02 76 00 6d 01 00 | 01 40 01 53 01 53 01 c7 |...v.m..|.@.S.S..|
|000028e0| a0 03 00 00 00 00 00 01 | 00 00 00 0c 00 00 00 10 |........|........|
|000028f0| 53 65 6e 64 20 47 72 65 | 65 74 69 6e 67 c9 00 00 |Send Gre|eting...|
|00002900| 6f 6e 20 6d 6f 75 73 65 | 55 70 0d 70 75 74 20 65 |on mouse|Up.put e|
|00002910| 6d 70 74 79 20 69 6e 74 | 6f 20 65 76 65 6e 74 73 |mpty int|o events|
|00002920| 0d 70 75 74 20 65 6d 70 | 74 79 20 69 6e 74 6f 20 |.put emp|ty into |
|00002930| 77 68 65 72 65 0d 72 65 | 70 65 61 74 20 77 69 74 |where.re|peat wit|
|00002940| 68 20 66 20 3d 20 34 20 | 74 6f 20 35 0d 72 65 70 |h f = 4 |to 5.rep|
|00002950| 65 61 74 20 77 69 74 68 | 20 69 20 3d 20 31 20 74 |eat with| i = 1 t|
|00002960| 6f 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |o the nu|mber of |
|00002970| 6c 69 6e 65 73 20 69 6e | 20 62 6b 67 6e 64 20 66 |lines in| bkgnd f|
|00002980| 69 65 6c 64 20 66 0d 69 | 66 20 28 6c 69 6e 65 20 |ield f.i|f (line |
|00002990| 69 20 6f 66 20 62 6b 67 | 6e 64 20 66 69 65 6c 64 |i of bkg|nd field|
|000029a0| 20 66 20 69 73 20 6e 6f | 74 20 65 6d 70 74 79 29 | f is no|t empty)|
|000029b0| 20 c2 0d 61 6e 64 20 28 | 6c 69 6e 65 20 69 20 6f | ..and (|line i o|
|000029c0| 66 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 28 66 |f bkgnd |field (f|
|000029d0| 2b 32 29 20 69 73 20 65 | 6d 70 74 79 29 20 74 68 |+2) is e|mpty) th|
|000029e0| 65 6e 0d 70 75 74 20 28 | 6c 69 6e 65 20 69 20 6f |en.put (|line i o|
|000029f0| 66 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 66 29 |f bkgnd |field f)|
|00002a00| 26 72 65 74 75 72 6e 20 | 61 66 74 65 72 20 65 76 |&return |after ev|
|00002a10| 65 6e 74 73 0d 69 66 20 | 77 68 65 72 65 20 69 73 |ents.if |where is|
|00002a20| 20 6e 6f 74 20 65 6d 70 | 74 79 20 74 68 65 6e 20 | not emp|ty then |
|00002a30| 70 75 74 20 22 2c 22 20 | 61 66 74 65 72 20 77 68 |put "," |after wh|
|00002a40| 65 72 65 0d 70 75 74 20 | 66 26 26 69 20 61 66 74 |ere.put |f&&i aft|
|00002a50| 65 72 20 77 68 65 72 65 | 0d 65 6e 64 20 69 66 0d |er where|.end if.|
|00002a60| 65 6e 64 20 72 65 70 65 | 61 74 0d 65 6e 64 20 72 |end repe|at.end r|
|00002a70| 65 70 65 61 74 0d 69 66 | 20 65 76 65 6e 74 73 20 |epeat.if| events |
|00002a80| 69 73 20 6e 6f 74 20 65 | 6d 70 74 79 20 74 68 65 |is not e|mpty the|
|00002a90| 6e 0d 67 6f 20 74 6f 20 | 63 61 72 64 20 22 4f 63 |n.go to |card "Oc|
|00002aa0| 63 61 73 69 6f 6e 20 49 | 6e 64 65 78 22 0d 70 75 |casion I|ndex".pu|
|00002ab0| 74 20 65 76 65 6e 74 73 | 20 69 6e 74 6f 20 62 6b |t events| into bk|
|00002ac0| 67 6e 64 20 66 69 65 6c | 64 20 22 4f 63 63 61 73 |gnd fiel|d "Occas|
|00002ad0| 69 6f 6e 20 49 6e 64 65 | 78 22 0d 70 75 74 20 77 |ion Inde|x".put w|
|00002ae0| 68 65 72 65 20 69 6e 74 | 6f 20 62 6b 67 6e 64 20 |here int|o bkgnd |
|00002af0| 66 69 65 6c 64 20 22 57 | 68 65 72 65 22 0d 65 6c |field "W|here".el|
|00002b00| 73 65 20 61 6e 73 77 65 | 72 20 22 47 72 65 65 74 |se answe|r "Greet|
|00002b10| 69 6e 67 73 20 61 6c 72 | 65 61 64 79 20 73 65 6e |ings alr|eady sen|
|00002b20| 74 20 66 6f 72 20 61 6c | 6c 20 6f 63 63 61 73 69 |t for al|l occasi|
|00002b30| 6f 6e 73 20 68 65 72 65 | 22 0d 65 6e 64 20 6d 6f |ons here|".end mo|
|00002b40| 75 73 65 55 70 0d 00 00 | 00 6f 6e 20 6f 70 65 6e |useUp...|.on open|
|00002b50| 43 61 72 64 0d 70 75 74 | 20 74 68 65 20 64 61 74 |Card.put| the dat|
|00002b60| 65 20 69 6e 74 6f 20 62 | 6b 67 6e 64 20 66 69 65 |e into b|kgnd fie|
|00002b70| 6c 64 20 22 74 6f 64 61 | 79 22 0d 65 6e 64 20 6f |ld "toda|y".end o|
|00002b80| 70 65 6e 43 61 72 64 0d | 0d 6f 6e 20 6d 6f 76 65 |penCard.|.on move|
|00002b90| 46 65 61 73 74 0d 63 68 | 61 6e 67 65 43 75 72 73 |Feast.ch|angeCurs|
|00002ba0| 6f 72 20 34 0d 67 65 74 | 20 74 68 65 20 64 61 74 |or 4.get| the dat|
|00002bb0| 65 0d 63 6f 6e 76 65 72 | 74 20 69 74 20 74 6f 20 |e.conver|t it to |
|00002bc0| 64 61 74 65 49 74 65 6d | 73 0d 70 75 74 20 69 74 |dateItem|s.put it|
|00002bd0| 65 6d 20 31 20 6f 66 20 | 69 74 20 69 6e 74 6f 20 |em 1 of |it into |
|00002be0| 74 68 69 73 59 65 61 72 | 0d 70 75 74 20 69 74 65 |thisYear|.put ite|
|00002bf0| 6d 20 32 20 6f 66 20 69 | 74 20 69 6e 74 6f 20 74 |m 2 of i|t into t|
|00002c00| 68 69 73 4d 6f 0d 70 75 | 73 68 20 63 61 72 64 0d |hisMo.pu|sh card.|
|00002c10| 67 6f 20 74 6f 20 63 61 | 72 64 20 22 48 65 6c 70 |go to ca|rd "Help|
|00002c20| 22 20 6f 66 20 73 74 61 | 63 6b 20 22 42 6c 61 63 |" of sta|ck "Blac|
|00002c30| 6b 42 6f 6f 6b 22 0d 72 | 65 70 65 61 74 20 77 69 |kBook".r|epeat wi|
|00002c40| 74 68 20 6c 69 6e 75 6d | 20 3d 20 31 20 74 6f 20 |th linum| = 1 to |
|00002c50| 31 30 0d 70 75 74 20 6c | 69 6e 65 20 6c 69 6e 75 |10.put l|ine linu|
|00002c60| 6d 20 6f 66 20 63 61 72 | 64 20 66 69 65 6c 64 20 |m of car|d field |
|00002c70| 22 48 6f 6c 69 64 61 79 | 20 44 61 74 65 73 22 20 |"Holiday| Dates" |
|00002c80| 69 6e 74 6f 20 6f 6c 64 | 44 61 74 65 0d 63 6f 6e |into old|Date.con|
|00002c90| 76 65 72 74 20 6f 6c 64 | 44 61 74 65 20 74 6f 20 |vert old|Date to |
|00002ca0| 64 61 74 65 49 74 65 6d | 73 0d 70 75 74 20 69 74 |dateItem|s.put it|
|00002cb0| 65 6d 20 31 20 6f 66 20 | 6f 6c 64 44 61 74 65 20 |em 1 of |oldDate |
|00002cc0| 69 6e 74 6f 20 6f 6c 64 | 59 65 61 72 0d 70 75 74 |into old|Year.put|
|00002cd0| 20 69 74 65 6d 20 32 20 | 6f 66 20 6f 6c 64 44 61 | item 2 |of oldDa|
|00002ce0| 74 65 20 69 6e 74 6f 20 | 6f 6c 64 4d 6f 0d 70 75 |te into |oldMo.pu|
|00002cf0| 74 20 69 74 65 6d 20 33 | 20 6f 66 20 6f 6c 64 44 |t item 3| of oldD|
|00002d00| 61 74 65 20 69 6e 74 6f | 20 6f 6c 64 44 61 79 0d |ate into| oldDay.|
|00002d10| 69 66 20 6f 6c 64 59 65 | 61 72 20 3c 20 74 68 69 |if oldYe|ar < thi|
|00002d20| 73 59 65 61 72 20 61 6e | 64 20 6f 6c 64 4d 6f 20 |sYear an|d oldMo |
|00002d30| b2 20 74 68 69 73 4d 6f | 2b 33 20 74 68 65 6e 0d |. thisMo|+3 then.|
|00002d40| 70 75 74 20 22 20 56 61 | 6c 65 6e 74 69 6e 65 2c |put " Va|lentine,|
|00002d50| 20 53 74 2e 20 50 61 74 | 72 69 63 6b 27 73 2c 20 | St. Pat|rick's, |
|00002d60| 50 61 73 73 6f 76 65 72 | 2c 20 45 61 73 74 65 72 |Passover|, Easter|
|00002d70| 2c 20 4d 6f 74 68 65 72 | 27 73 20 44 61 79 2c 20 |, Mother|'s Day, |
|00002d80| 22 26 20 c2 0d 22 46 61 | 74 68 65 72 27 73 20 44 |"& .."Fa|ther's D|
|00002d90| 61 79 2c 20 52 6f 73 68 | 20 48 61 73 68 61 6e 61 |ay, Rosh| Hashana|
|00002da0| 68 2c 20 48 61 6c 6c 6f | 77 65 65 6e 2c 20 54 68 |h, Hallo|ween, Th|
|00002db0| 61 6e 6b 73 67 69 76 69 | 6e 67 2c 20 48 61 6e 6e |anksgivi|ng, Hann|
|00002dc0| 75 6b 61 68 22 20 69 6e | 74 6f 20 68 0d 70 75 74 |ukah" in|to h.put|
|00002dd0| 20 69 74 65 6d 20 6c 69 | 6e 75 6d 20 6f 66 20 68 | item li|num of h|
|00002de0| 20 69 6e 74 6f 20 68 6f | 6c 69 64 61 79 0d 64 65 | into ho|liday.de|
|00002df0| 6c 65 74 65 20 63 68 61 | 72 20 31 20 6f 66 20 68 |lete cha|r 1 of h|
|00002e00| 6f 6c 69 64 61 79 0d 70 | 75 74 20 66 61 6c 73 65 |oliday.p|ut false|
|00002e10| 20 69 6e 74 6f 20 63 68 | 65 63 6b 0d 61 73 6b 20 | into ch|eck.ask |
|00002e20| 22 50 6c 65 61 73 65 20 | 73 75 70 70 6c 79 20 22 |"Please |supply "|
|00002e30| 26 74 68 69 73 59 65 61 | 72 26 22 20 64 61 74 65 |&thisYea|r&" date|
|00002e40| 20 66 6f 72 20 22 26 68 | 6f 6c 69 64 61 79 20 c2 | for "&h|oliday .|
|00002e50| 0d 77 69 74 68 20 22 4d | 4d 2f 44 44 2f 59 59 20 |.with "M|M/DD/YY |
|00002e60| 2d 2d 2d 20 55 73 65 20 | 43 61 6e 63 65 6c 20 69 |--- Use |Cancel i|
|00002e70| 66 20 75 6e 6b 6e 6f 77 | 6e 22 0d 69 66 20 69 74 |f unknow|n".if it|
|00002e80| 20 69 73 20 6e 6f 74 20 | 65 6d 70 74 79 20 74 68 | is not |empty th|
|00002e90| 65 6e 0d 70 75 74 20 63 | 6b 44 61 74 65 28 20 69 |en.put c|kDate( i|
|00002ea0| 74 29 20 69 6e 74 6f 20 | 69 74 0d 63 68 61 6e 67 |t) into |it.chang|
|00002eb0| 65 43 75 72 73 6f 72 20 | 35 0d 63 6f 6e 76 65 72 |eCursor |5.conver|
|00002ec0| 74 20 69 74 20 74 6f 20 | 64 61 74 65 49 74 65 6d |t it to |dateItem|
|00002ed0| 73 0d 69 66 20 69 74 65 | 6d 20 31 20 6f 66 20 69 |s.if ite|m 1 of i|
|00002ee0| 74 20 ad 20 74 68 69 73 | 59 65 61 72 20 74 68 65 |t . this|Year the|
|00002ef0| 6e 20 70 75 74 20 74 68 | 69 73 59 65 61 72 20 69 |n put th|isYear i|
|00002f00| 6e 74 6f 20 69 74 65 6d | 20 31 20 6f 66 20 69 74 |nto item| 1 of it|
|00002f10| 0d 63 6f 6e 76 65 72 74 | 20 69 74 20 74 6f 20 73 |.convert| it to s|
|00002f20| 68 6f 72 74 20 64 61 74 | 65 0d 70 75 74 20 69 74 |hort dat|e.put it|
|00002f30| 20 69 6e 74 6f 20 6e 65 | 77 44 61 74 65 0d 70 75 | into ne|wDate.pu|
|00002f40| 74 20 6e 65 77 44 61 74 | 65 20 69 6e 74 6f 20 6c |t newDat|e into l|
|00002f50| 69 6e 65 20 6c 69 6e 75 | 6d 20 6f 66 20 63 61 72 |ine linu|m of car|
|00002f60| 64 20 66 69 65 6c 64 20 | 22 48 6f 6c 69 64 61 79 |d field |"Holiday|
|00002f70| 20 44 61 74 65 73 22 0d | 63 6f 6e 76 65 72 74 20 | Dates".|convert |
|00002f80| 69 74 20 74 6f 20 64 61 | 74 65 49 74 65 6d 73 20 |it to da|teItems |
|00002f90| 2d 2d 20 6e 65 77 44 61 | 74 65 0d 69 66 20 28 69 |-- newDa|te.if (i|
|00002fa0| 74 65 6d 20 33 20 6f 66 | 20 69 74 29 20 3d 20 6f |tem 3 of| it) = o|
|00002fb0| 6c 64 44 61 79 20 61 6e | 64 20 28 69 74 65 6d 20 |ldDay an|d (item |
|00002fc0| 32 20 6f 66 20 69 74 29 | 20 3d 20 6f 6c 64 4d 6f |2 of it)| = oldMo|
|00002fd0| 20 74 68 65 6e 0d 70 6f | 70 20 63 61 72 64 0d 65 | then.po|p card.e|
|00002fe0| 78 69 74 20 6d 6f 76 65 | 46 65 61 73 74 20 2d 2d |xit move|Feast --|
|00002ff0| 20 64 6f 6e 74 20 75 70 | 64 61 74 65 20 44 61 74 | dont up|date Dat|
|00003000| 65 20 42 6f 6f 6b 20 69 | 66 20 6d 6f 20 26 20 64 |e Book i|f mo & d|
|00003010| 61 79 20 73 61 6d 65 0d | 65 6e 64 20 69 66 0d 70 |ay same.|end if.p|
|00003020| 75 73 68 20 63 61 72 64 | 0d 67 6f 20 74 6f 20 63 |ush card|.go to c|
|00003030| 61 72 64 20 28 6f 6c 64 | 4d 6f 2a 32 2d 31 29 20 |ard (old|Mo*2-1) |
|00003040| 6f 66 20 73 74 61 63 6b | 20 22 44 61 74 65 20 42 |of stack| "Date B|
|00003050| 6f 6f 6b 22 0d 69 66 20 | 6f 6c 64 44 61 79 20 3c |ook".if |oldDay <|
|00003060| 20 31 36 20 20 74 68 65 | 6e 20 70 75 74 20 34 20 | 16  the|n put 4 |
|00003070| 69 6e 74 6f 20 66 20 20 | 65 6c 73 65 20 70 75 74 |into f  |else put|
|00003080| 20 35 20 69 6e 74 6f 20 | 66 0d 70 75 74 20 6f 6c | 5 into |f.put ol|
|00003090| 64 44 61 79 26 22 2c 20 | 22 26 68 6f 6c 69 64 61 |dDay&", |"&holida|
|000030a0| 79 26 22 2c 20 22 20 69 | 6e 74 6f 20 6f 6c 64 0d |y&", " i|nto old.|
|000030b0| 70 75 74 20 74 68 65 20 | 6c 65 6e 67 74 68 20 6f |put the |length o|
|000030c0| 66 20 6f 6c 64 20 69 6e | 74 6f 20 6f 6c 64 4c 65 |f old in|to oldLe|
|000030d0| 6e 0d 70 75 74 20 6f 66 | 66 73 65 74 28 6f 6c 64 |n.put of|fset(old|
|000030e0| 2c 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 66 29 |, bkgnd |field f)|
|000030f0| 20 69 6e 74 6f 20 63 0d | 63 68 61 6e 67 65 43 75 | into c.|changeCu|
|00003100| 72 73 6f 72 20 36 0d 72 | 65 70 65 61 74 20 75 6e |rsor 6.r|epeat un|
|00003110| 74 69 6c 20 63 20 3d 20 | 30 0d 70 75 74 20 6f 6c |til c = |0.put ol|
|00003120| 64 20 69 6e 74 6f 20 72 | 65 70 6c 61 63 65 0d 61 |d into r|eplace.a|
|00003130| 64 64 20 6f 6c 64 4c 65 | 6e 20 74 6f 20 63 0d 72 |dd oldLe|n to c.r|
|00003140| 65 70 65 61 74 20 77 68 | 69 6c 65 20 63 68 61 72 |epeat wh|ile char|
|00003150| 20 63 20 6f 66 20 62 6b | 67 6e 64 20 66 69 65 6c | c of bk|gnd fiel|
|00003160| 64 20 66 20 ad 20 72 65 | 74 75 72 6e 0d 70 75 74 |d f . re|turn.put|
|00003170| 20 63 68 61 72 20 63 20 | 6f 66 20 62 6b 67 6e 64 | char c |of bkgnd|
|00003180| 20 66 69 65 6c 64 20 66 | 20 61 66 74 65 72 20 72 | field f| after r|
|00003190| 65 70 6c 61 63 65 0d 61 | 64 64 20 31 20 74 6f 20 |eplace.a|dd 1 to |
|000031a0| 63 0d 65 6e 64 20 72 65 | 70 65 61 74 0d 70 75 74 |c.end re|peat.put|
|000031b0| 20 6e 65 77 44 61 74 65 | 20 69 6e 74 6f 20 69 74 | newDate| into it|
|000031c0| 65 6d 20 31 20 6f 66 20 | 72 65 70 6c 61 63 65 0d |em 1 of |replace.|
|000031d0| 70 75 73 68 20 63 61 72 | 64 0d 70 75 74 20 61 64 |push car|d.put ad|
|000031e0| 64 49 74 65 6d 28 72 65 | 70 6c 61 63 65 29 20 69 |dItem(re|place) i|
|000031f0| 6e 74 6f 20 69 74 0d 70 | 6f 70 20 63 61 72 64 0d |nto it.p|op card.|
|00003200| 70 75 74 20 6f 66 66 73 | 65 74 28 6f 6c 64 2c 20 |put offs|et(old, |
|00003210| 62 6b 67 6e 64 20 66 69 | 65 6c 64 20 66 29 20 69 |bkgnd fi|eld f) i|
|00003220| 6e 74 6f 20 63 0d 65 6e | 64 20 72 65 70 65 61 74 |nto c.en|d repeat|
|00003230| 0d 70 6f 70 20 63 61 72 | 64 0d 65 78 69 74 20 72 |.pop car|d.exit r|
|00003240| 65 70 65 61 74 0d 65 6e | 64 20 69 66 0d 65 6e 64 |epeat.en|d if.end|
|00003250| 20 69 66 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 70 | if.end |repeat.p|
|00003260| 6f 70 20 63 61 72 64 0d | 65 6e 64 20 6d 6f 76 65 |op card.|end move|
|00003270| 46 65 61 73 74 0d 0d 66 | 75 6e 63 74 69 6f 6e 20 |Feast..f|unction |
|00003280| 65 72 61 73 65 4c 69 6e | 65 20 70 74 72 6e 2c 20 |eraseLin|e ptrn, |
|00003290| 66 0d 70 75 74 20 6f 66 | 66 73 65 74 28 20 70 74 |f.put of|fset( pt|
|000032a0| 72 6e 2c 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 |rn, bkgn|d field |
|000032b0| 66 29 20 69 6e 74 6f 20 | 63 0d 69 66 20 63 20 3e |f) into |c.if c >|
|000032c0| 20 30 20 74 68 65 6e 0d | 64 65 6c 65 74 65 20 63 | 0 then.|delete c|
|000032d0| 68 61 72 20 63 20 74 6f | 20 28 63 20 2d 20 31 20 |har c to| (c - 1 |
|000032e0| 2b 20 74 68 65 20 6c 65 | 6e 67 74 68 20 6f 66 20 |+ the le|ngth of |
|000032f0| 70 74 72 6e 29 20 6f 66 | 20 62 6b 67 6e 64 20 66 |ptrn) of| bkgnd f|
|00003300| 69 65 6c 64 20 66 0d 72 | 65 70 65 61 74 20 75 6e |ield f.r|epeat un|
|00003310| 74 69 6c 20 63 68 61 72 | 20 63 20 6f 66 20 62 6b |til char| c of bk|
|00003320| 67 6e 64 20 66 69 65 6c | 64 20 66 20 69 73 20 72 |gnd fiel|d f is r|
|00003330| 65 74 75 72 6e 0d 64 65 | 6c 65 74 65 20 63 68 61 |eturn.de|lete cha|
|00003340| 72 20 63 20 6f 66 20 62 | 6b 67 6e 64 20 66 69 65 |r c of b|kgnd fie|
|00003350| 6c 64 20 66 0d 69 66 20 | 63 20 3e 20 74 68 65 20 |ld f.if |c > the |
|00003360| 6e 75 6d 62 65 72 20 6f | 66 20 63 68 61 72 73 20 |number o|f chars |
|00003370| 69 6e 20 62 6b 67 6e 64 | 20 66 69 65 6c 64 20 66 |in bkgnd| field f|
|00003380| 20 74 68 65 6e 20 65 78 | 69 74 20 72 65 70 65 61 | then ex|it repea|
|00003390| 74 0d 65 6e 64 20 72 65 | 70 65 61 74 0d 73 75 62 |t.end re|peat.sub|
|000033a0| 74 72 61 63 74 20 31 20 | 66 72 6f 6d 20 63 0d 69 |tract 1 |from c.i|
|000033b0| 66 20 63 20 3e 20 30 20 | 74 68 65 6e 0d 72 65 70 |f c > 0 |then.rep|
|000033c0| 65 61 74 20 75 6e 74 69 | 6c 20 63 68 61 72 20 63 |eat unti|l char c|
|000033d0| 20 6f 66 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 | of bkgn|d field |
|000033e0| 66 20 69 73 20 72 65 74 | 75 72 6e 0d 64 65 6c 65 |f is ret|urn.dele|
|000033f0| 74 65 20 63 68 61 72 20 | 63 20 6f 66 20 62 6b 67 |te char |c of bkg|
|00003400| 6e 64 20 66 69 65 6c 64 | 20 66 0d 73 75 62 74 72 |nd field| f.subtr|
|00003410| 61 63 74 20 31 20 66 72 | 6f 6d 20 63 0d 69 66 20 |act 1 fr|om c.if |
|00003420| 63 20 b2 20 30 20 74 68 | 65 6e 20 65 78 69 74 20 |c . 0 th|en exit |
|00003430| 72 65 70 65 61 74 0d 65 | 6e 64 20 72 65 70 65 61 |repeat.e|nd repea|
|00003440| 74 0d 65 6e 64 20 69 66 | 0d 72 65 74 75 72 6e 20 |t.end if|.return |
|00003450| 63 0d 65 6c 73 65 0d 72 | 65 74 75 72 6e 20 2d 39 |c.else.r|eturn -9|
|00003460| 39 0d 65 6e 64 20 69 66 | 0d 65 6e 64 20 65 72 61 |9.end if|.end era|
|00003470| 73 65 4c 69 6e 65 0d 0d | 66 75 6e 63 74 69 6f 6e |seLine..|function|
|00003480| 20 63 70 79 49 74 65 6d | 4e 61 6d 65 20 66 65 65 | cpyItem|Name fee|
|00003490| 6c 64 2c 20 62 75 74 2c | 20 6e 61 6d 2c 20 68 69 |ld, but,| nam, hi|
|000034a0| 67 68 6c 69 67 68 74 0d | 70 75 74 20 6e 61 6d 20 |ghlight.|put nam |
|000034b0| 69 6e 74 6f 20 6c 69 6e | 65 20 62 75 74 20 6f 66 |into lin|e but of|
|000034c0| 20 62 6b 67 6e 64 20 66 | 69 65 6c 64 20 66 65 65 | bkgnd f|ield fee|
|000034d0| 6c 64 0d 69 66 20 66 65 | 65 6c 64 20 3d 20 35 20 |ld.if fe|eld = 5 |
|000034e0| 74 68 65 6e 0d 70 75 74 | 20 68 69 67 68 6c 69 67 |then.put| highlig|
|000034f0| 68 74 20 69 6e 74 6f 20 | 6c 69 6e 65 20 62 75 74 |ht into |line but|
|00003500| 20 6f 66 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 | of bkgn|d field |
|00003510| 37 0d 67 6f 20 6e 65 78 | 74 0d 70 75 74 20 6e 61 |7.go nex|t.put na|
|00003520| 6d 20 69 6e 74 6f 20 6c | 69 6e 65 20 62 75 74 20 |m into l|ine but |
|00003530| 6f 66 20 62 6b 67 6e 64 | 20 66 69 65 6c 64 20 34 |of bkgnd| field 4|
|00003540| 0d 70 75 74 20 68 69 67 | 68 6c 69 67 68 74 20 69 |.put hig|hlight i|
|00003550| 6e 74 6f 20 6c 69 6e 65 | 20 62 75 74 20 6f 66 20 |nto line| but of |
|00003560| 62 6b 67 6e 64 20 66 69 | 65 6c 64 20 36 0d 67 6f |bkgnd fi|eld 6.go|
|00003570| 20 70 72 65 76 0d 65 6c | 73 65 0d 70 75 74 20 68 | prev.el|se.put h|
|00003580| 69 67 68 6c 69 67 68 74 | 20 69 6e 74 6f 20 6c 69 |ighlight| into li|
|00003590| 6e 65 20 62 75 74 20 6f | 66 20 62 6b 67 6e 64 20 |ne but o|f bkgnd |
|000035a0| 66 69 65 6c 64 20 36 0d | 69 66 20 74 68 65 20 6e |field 6.|if the n|
|000035b0| 75 6d 62 65 72 20 6f 66 | 20 74 68 69 73 20 63 61 |umber of| this ca|
|000035c0| 72 64 20 3e 20 31 20 74 | 68 65 6e 0d 67 6f 20 70 |rd > 1 t|hen.go p|
|000035d0| 72 65 76 0d 70 75 74 20 | 6e 61 6d 20 69 6e 74 6f |rev.put |nam into|
|000035e0| 20 6c 69 6e 65 20 62 75 | 74 20 6f 66 20 62 6b 67 | line bu|t of bkg|
|000035f0| 6e 64 20 66 69 65 6c 64 | 20 35 0d 70 75 74 20 68 |nd field| 5.put h|
|00003600| 69 67 68 6c 69 67 68 74 | 20 69 6e 74 6f 20 6c 69 |ighlight| into li|
|00003610| 6e 65 20 62 75 74 20 6f | 66 20 62 6b 67 6e 64 20 |ne but o|f bkgnd |
|00003620| 66 69 65 6c 64 20 37 0d | 67 6f 20 6e 65 78 74 0d |field 7.|go next.|
|00003630| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 72 65 |end if.e|nd if.re|
|00003640| 74 75 72 6e 20 65 6d 70 | 74 79 0d 65 6e 64 20 63 |turn emp|ty.end c|
|00003650| 70 79 49 74 65 6d 4e 61 | 6d 65 0d 0d 66 75 6e 63 |pyItemNa|me..func|
|00003660| 74 69 6f 6e 20 64 72 6f | 70 69 74 65 6d 20 65 76 |tion dro|pitem ev|
|00003670| 65 6e 74 0d 63 68 61 6e | 67 65 43 75 72 73 6f 72 |ent.chan|geCursor|
|00003680| 20 33 0d 70 75 74 20 69 | 74 65 6d 20 31 20 6f 66 | 3.put i|tem 1 of|
|00003690| 20 65 76 65 6e 74 20 69 | 6e 74 6f 20 65 64 61 74 | event i|nto edat|
|000036a0| 65 0d 63 6f 6e 76 65 72 | 74 20 65 64 61 74 65 20 |e.conver|t edate |
|000036b0| 74 6f 20 64 61 74 65 49 | 74 65 6d 73 0d 69 66 20 |to dateI|tems.if |
|000036c0| 74 68 65 20 72 65 73 75 | 6c 74 20 63 6f 6e 74 61 |the resu|lt conta|
|000036d0| 69 6e 73 20 22 69 6e 76 | 61 6c 69 64 20 64 61 74 |ins "inv|alid dat|
|000036e0| 65 22 20 74 68 65 6e 20 | 72 65 74 75 72 6e 20 66 |e" then |return f|
|000036f0| 61 6c 73 65 0d 70 75 74 | 20 69 74 65 6d 20 32 20 |alse.put| item 2 |
|00003700| 6f 66 20 65 64 61 74 65 | 20 69 6e 74 6f 20 6d 6f |of edate| into mo|
|00003710| 0d 70 75 74 20 69 74 65 | 6d 20 33 20 6f 66 20 65 |.put ite|m 3 of e|
|00003720| 64 61 74 65 20 69 6e 74 | 6f 20 64 61 79 0d 64 65 |date int|o day.de|
|00003730| 6c 65 74 65 20 69 74 65 | 6d 20 31 20 6f 66 20 65 |lete ite|m 1 of e|
|00003740| 76 65 6e 74 0d 70 75 74 | 20 66 61 6c 73 65 20 69 |vent.put| false i|
|00003750| 6e 74 6f 20 66 6f 75 6e | 64 0d 67 6f 20 74 6f 20 |nto foun|d.go to |
|00003760| 63 61 72 64 20 22 4d 61 | 73 74 65 72 20 45 76 65 |card "Ma|ster Eve|
|00003770| 6e 74 20 4c 69 73 74 22 | 20 6f 66 20 73 74 61 63 |nt List"| of stac|
|00003780| 6b 20 22 4b 65 65 70 5f | 69 6e 5f 54 6f 75 63 68 |k "Keep_|in_Touch|
|00003790| 22 0d 70 75 74 20 6f 66 | 66 73 65 74 28 65 76 65 |".put of|fset(eve|
|000037a0| 6e 74 2c 20 63 61 72 64 | 20 66 69 65 6c 64 20 22 |nt, card| field "|
|000037b0| 4d 61 73 74 65 72 20 45 | 76 65 6e 74 20 4c 69 73 |Master E|vent Lis|
|000037c0| 74 22 29 20 69 6e 74 6f | 20 63 0d 69 66 20 63 20 |t") into| c.if c |
|000037d0| 3e 20 30 20 74 68 65 6e | 20 2d 2d 20 46 4f 55 4e |> 0 then| -- FOUN|
|000037e0| 44 0d 64 65 6c 65 74 65 | 20 63 68 61 72 20 63 20 |D.delete| char c |
|000037f0| 74 6f 20 28 63 20 2b 20 | 74 68 65 20 6c 65 6e 67 |to (c + |the leng|
|00003800| 74 68 20 6f 66 20 65 76 | 65 6e 74 29 20 c2 0d 6f |th of ev|ent) ..o|
|00003810| 66 20 63 61 72 64 20 66 | 69 65 6c 64 20 22 4d 61 |f card f|ield "Ma|
|00003820| 73 74 65 72 20 45 76 65 | 6e 74 20 4c 69 73 74 22 |ster Eve|nt List"|
|00003830| 0d 73 75 62 74 72 61 63 | 74 20 31 20 66 72 6f 6d |.subtrac|t 1 from|
|00003840| 20 63 0d 69 66 20 63 20 | 3e 20 30 20 74 68 65 6e | c.if c |> 0 then|
|00003850| 0d 72 65 70 65 61 74 20 | 77 68 69 6c 65 20 28 63 |.repeat |while (c|
|00003860| 68 61 72 20 63 20 6f 66 | 20 63 61 72 64 20 66 69 |har c of| card fi|
|00003870| 65 6c 64 20 22 4d 61 73 | 74 65 72 20 45 76 65 6e |eld "Mas|ter Even|
|00003880| 74 20 4c 69 73 74 22 29 | 20 ad 20 72 65 74 75 72 |t List")| . retur|
|00003890| 6e 0d 64 65 6c 65 74 65 | 20 63 68 61 72 20 63 20 |n.delete| char c |
|000038a0| 6f 66 20 63 61 72 64 20 | 66 69 65 6c 64 20 22 4d |of card |field "M|
|000038b0| 61 73 74 65 72 20 45 76 | 65 6e 74 20 4c 69 73 74 |aster Ev|ent List|
|000038c0| 22 0d 73 75 62 74 72 61 | 63 74 20 31 20 66 72 6f |".subtra|ct 1 fro|
|000038d0| 6d 20 63 0d 69 66 20 63 | 20 b2 20 30 20 74 68 65 |m c.if c| . 0 the|
|000038e0| 6e 20 65 78 69 74 20 72 | 65 70 65 61 74 0d 65 6e |n exit r|epeat.en|
|000038f0| 64 20 72 65 70 65 61 74 | 0d 65 6e 64 20 69 66 0d |d repeat|.end if.|
|00003900| 70 75 74 20 28 64 61 79 | 26 22 2c 22 26 65 76 65 |put (day|&","&eve|
|00003910| 6e 74 29 20 69 6e 74 6f | 20 65 6e 74 72 79 0d 67 |nt) into| entry.g|
|00003920| 6f 20 74 6f 20 63 61 72 | 64 20 28 28 6d 6f 2d 31 |o to car|d ((mo-1|
|00003930| 29 2a 32 20 2b 20 31 29 | 20 6f 66 20 73 74 61 63 |)*2 + 1)| of stac|
|00003940| 6b 20 22 44 61 74 65 20 | 42 6f 6f 6b 22 0d 69 66 |k "Date |Book".if|
|00003950| 20 64 61 79 20 3c 20 31 | 36 0d 74 68 65 6e 20 70 | day < 1|6.then p|
|00003960| 75 74 20 34 20 69 6e 74 | 6f 20 66 0d 65 6c 73 65 |ut 4 int|o f.else|
|00003970| 20 70 75 74 20 35 20 69 | 6e 74 6f 20 66 0d 70 75 | put 5 i|nto f.pu|
|00003980| 74 20 6f 66 66 73 65 74 | 28 20 65 6e 74 72 79 2c |t offset|( entry,|
|00003990| 20 62 6b 67 6e 64 20 66 | 69 65 6c 64 20 66 29 20 | bkgnd f|ield f) |
|000039a0| 69 6e 74 6f 20 63 0d 69 | 66 20 63 20 3e 20 30 20 |into c.i|f c > 0 |
|000039b0| 74 68 65 6e 0d 70 75 74 | 20 74 72 75 65 20 69 6e |then.put| true in|
|000039c0| 74 6f 20 66 6f 75 6e 64 | 0d 70 75 74 20 65 6d 70 |to found|.put emp|
|000039d0| 74 79 20 69 6e 74 6f 20 | 63 68 61 72 20 63 20 74 |ty into |char c t|
|000039e0| 6f 20 28 63 20 2d 20 31 | 20 2b 20 74 68 65 20 6c |o (c - 1| + the l|
|000039f0| 65 6e 67 74 68 20 6f 66 | 20 65 6e 74 72 79 29 20 |ength of| entry) |
|00003a00| 6f 66 20 62 6b 67 6e 64 | 20 66 69 65 6c 64 20 66 |of bkgnd| field f|
|00003a10| 0d 70 75 74 20 63 68 61 | 72 20 31 20 74 6f 20 63 |.put cha|r 1 to c|
|00003a20| 20 6f 66 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 | of bkgn|d field |
|00003a30| 66 20 69 6e 74 6f 20 69 | 74 0d 70 75 74 20 74 68 |f into i|t.put th|
|00003a40| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6c 69 6e 65 |e number| of line|
|00003a50| 73 20 69 6e 20 69 74 20 | 69 6e 74 6f 20 62 0d 69 |s in it |into b.i|
|00003a60| 66 20 64 61 79 20 3c 20 | 31 36 20 74 68 65 6e 0d |f day < |16 then.|
|00003a70| 70 75 74 20 65 6d 70 74 | 79 20 69 6e 74 6f 20 6c |put empt|y into l|
|00003a80| 69 6e 65 20 62 20 6f 66 | 20 62 6b 67 6e 64 20 66 |ine b of| bkgnd f|
|00003a90| 69 65 6c 64 20 36 0d 67 | 6f 20 70 72 65 76 0d 69 |ield 6.g|o prev.i|
|00003aa0| 66 20 65 72 61 73 65 4c | 69 6e 65 28 20 65 6e 74 |f eraseL|ine( ent|
|00003ab0| 72 79 2c 20 35 29 20 b3 | 20 30 0d 74 68 65 6e 20 |ry, 5) .| 0.then |
|00003ac0| 70 75 74 20 65 6d 70 74 | 79 20 69 6e 74 6f 20 6c |put empt|y into l|
|00003ad0| 69 6e 65 20 62 20 6f 66 | 20 62 6b 67 6e 64 20 66 |ine b of| bkgnd f|
|00003ae0| 69 65 6c 64 20 37 0d 67 | 6f 20 6e 65 78 74 0d 65 |ield 7.g|o next.e|
|00003af0| 6c 73 65 0d 70 75 74 20 | 65 6d 70 74 79 20 69 6e |lse.put |empty in|
|00003b00| 74 6f 20 6c 69 6e 65 20 | 62 20 6f 66 20 62 6b 67 |to line |b of bkg|
|00003b10| 6e 64 20 66 69 65 6c 64 | 20 37 0d 67 6f 20 6e 65 |nd field| 7.go ne|
|00003b20| 78 74 0d 69 66 20 65 72 | 61 73 65 4c 69 6e 65 28 |xt.if er|aseLine(|
|00003b30| 20 65 6e 74 72 79 2c 20 | 34 29 20 b3 20 30 0d 74 | entry, |4) . 0.t|
|00003b40| 68 65 6e 20 70 75 74 20 | 65 6d 70 74 79 20 69 6e |hen put |empty in|
|00003b50| 74 6f 20 6c 69 6e 65 20 | 62 20 6f 66 20 62 6b 67 |to line |b of bkg|
|00003b60| 6e 64 20 66 69 65 6c 64 | 20 36 0d 67 6f 20 70 72 |nd field| 6.go pr|
|00003b70| 65 76 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 69 66 |ev.end i|f.end if|
|00003b80| 0d 65 6e 64 20 69 66 0d | 72 65 74 75 72 6e 20 66 |.end if.|return f|
|00003b90| 6f 75 6e 64 0d 65 6e 64 | 20 64 72 6f 70 69 74 65 |ound.end| dropite|
|00003ba0| 6d 0d 0d 66 75 6e 63 74 | 69 6f 6e 20 64 72 6f 70 |m..funct|ion drop|
|00003bb0| 48 6f 6c 69 64 61 79 20 | 66 61 6d 69 6c 79 0d 63 |Holiday |family.c|
|00003bc0| 68 61 6e 67 65 43 75 72 | 73 6f 72 20 33 0d 70 75 |hangeCur|sor 3.pu|
|00003bd0| 74 20 22 43 68 72 69 73 | 74 6d 61 73 2c 20 22 26 |t "Chris|tmas, "&|
|00003be0| 66 61 6d 69 6c 79 20 69 | 6e 74 6f 20 65 76 65 6e |family i|nto even|
|00003bf0| 74 0d 70 75 74 20 66 61 | 6c 73 65 20 69 6e 74 6f |t.put fa|lse into|
|00003c00| 20 66 6f 75 6e 64 0d 67 | 6f 20 74 6f 20 63 61 72 | found.g|o to car|
|00003c10| 64 20 22 4d 61 73 74 65 | 72 20 45 76 65 6e 74 20 |d "Maste|r Event |
|00003c20| 4c 69 73 74 22 20 6f 66 | 20 73 74 61 63 6b 20 22 |List" of| stack "|
|00003c30| 4b 65 65 70 5f 69 6e 5f | 54 6f 75 63 68 22 0d 70 |Keep_in_|Touch".p|
|00003c40| 75 74 20 6f 66 66 73 65 | 74 28 65 76 65 6e 74 2c |ut offse|t(event,|
|00003c50| 20 63 61 72 64 20 66 69 | 65 6c 64 20 22 4d 61 73 | card fi|eld "Mas|
|00003c60| 74 65 72 20 45 76 65 6e | 74 20 4c 69 73 74 22 29 |ter Even|t List")|
|00003c70| 20 69 6e 74 6f 20 63 0d | 69 66 20 63 20 3e 20 30 | into c.|if c > 0|
|00003c80| 20 74 68 65 6e 0d 70 75 | 74 20 65 6d 70 74 79 20 | then.pu|t empty |
|00003c90| 69 6e 74 6f 20 63 68 61 | 72 20 63 20 74 6f 20 28 |into cha|r c to (|
|00003ca0| 63 20 2b 20 74 68 65 20 | 6c 65 6e 67 74 68 20 6f |c + the |length o|
|00003cb0| 66 20 65 76 65 6e 74 29 | 20 c2 0d 6f 66 20 63 61 |f event)| ..of ca|
|00003cc0| 72 64 20 66 69 65 6c 64 | 20 22 4d 61 73 74 65 72 |rd field| "Master|
|00003cd0| 20 45 76 65 6e 74 20 4c | 69 73 74 22 0d 73 75 62 | Event L|ist".sub|
|00003ce0| 74 72 61 63 74 20 31 20 | 66 72 6f 6d 20 63 0d 72 |tract 1 |from c.r|
|00003cf0| 65 70 65 61 74 20 77 68 | 69 6c 65 20 28 63 68 61 |epeat wh|ile (cha|
|00003d00| 72 20 63 20 6f 66 20 63 | 61 72 64 20 66 69 65 6c |r c of c|ard fiel|
|00003d10| 64 20 22 4d 61 73 74 65 | 72 20 45 76 65 6e 74 20 |d "Maste|r Event |
|00003d20| 4c 69 73 74 22 29 20 ad | 20 72 65 74 75 72 6e 0d |List") .| return.|
|00003d30| 64 65 6c 65 74 65 20 63 | 68 61 72 20 63 20 6f 66 |delete c|har c of|
|00003d40| 20 63 61 72 64 20 66 69 | 65 6c 64 20 22 4d 61 73 | card fi|eld "Mas|
|00003d50| 74 65 72 20 45 76 65 6e | 74 20 4c 69 73 74 22 0d |ter Even|t List".|
|00003d60| 73 75 62 74 72 61 63 74 | 20 31 20 66 72 6f 6d 20 |subtract| 1 from |
|00003d70| 63 0d 69 66 20 63 20 b2 | 20 30 20 74 68 65 6e 20 |c.if c .| 0 then |
|00003d80| 65 78 69 74 20 72 65 70 | 65 61 74 0d 65 6e 64 20 |exit rep|eat.end |
|00003d90| 72 65 70 65 61 74 0d 72 | 65 70 65 61 74 20 77 69 |repeat.r|epeat wi|
|00003da0| 74 68 20 63 20 3d 20 32 | 34 20 74 6f 20 32 36 0d |th c = 2|4 to 26.|
|00003db0| 67 6f 20 74 6f 20 63 61 | 72 64 20 63 20 6f 66 20 |go to ca|rd c of |
|00003dc0| 73 74 61 63 6b 20 22 44 | 61 74 65 20 42 6f 6f 6b |stack "D|ate Book|
|00003dd0| 22 0d 69 66 20 63 20 3d | 20 32 34 20 20 74 68 65 |".if c =| 24  the|
|00003de0| 6e 20 70 75 74 20 35 20 | 69 6e 74 6f 20 73 74 61 |n put 5 |into sta|
|00003df0| 72 74 46 6c 64 20 20 65 | 6c 73 65 20 70 75 74 20 |rtFld  e|lse put |
|00003e00| 34 20 69 6e 74 6f 20 73 | 74 61 72 74 46 6c 64 0d |4 into s|tartFld.|
|00003e10| 72 65 70 65 61 74 20 77 | 69 74 68 20 66 20 3d 20 |repeat w|ith f = |
|00003e20| 73 74 61 72 74 46 6c 64 | 20 74 6f 20 35 0d 70 75 |startFld| to 5.pu|
|00003e30| 74 20 65 72 61 73 65 4c | 69 6e 65 28 20 28 22 32 |t eraseL|ine( ("2|
|00003e40| 35 2c 20 22 26 65 76 65 | 6e 74 29 2c 20 66 29 20 |5, "&eve|nt), f) |
|00003e50| 69 6e 74 6f 20 69 74 0d | 69 66 20 69 74 20 b3 20 |into it.|if it . |
|00003e60| 30 20 74 68 65 6e 0d 70 | 75 74 20 74 72 75 65 20 |0 then.p|ut true |
|00003e70| 69 6e 74 6f 20 66 6f 75 | 6e 64 0d 70 75 74 20 63 |into fou|nd.put c|
|00003e80| 68 61 72 20 31 20 74 6f | 20 69 74 2b 31 20 6f 66 |har 1 to| it+1 of|
|00003e90| 20 62 6b 67 6e 64 20 66 | 69 65 6c 64 20 66 20 69 | bkgnd f|ield f i|
|00003ea0| 6e 74 6f 20 78 0d 70 75 | 74 20 74 68 65 20 6e 75 |nto x.pu|t the nu|
|00003eb0| 6d 62 65 72 20 6f 66 20 | 6c 69 6e 65 73 20 69 6e |mber of |lines in|
|00003ec0| 20 78 20 69 6e 74 6f 20 | 6c 69 6e 75 6d 0d 70 75 | x into |linum.pu|
|00003ed0| 74 20 65 6d 70 74 79 20 | 69 6e 74 6f 20 6c 69 6e |t empty |into lin|
|00003ee0| 65 20 6c 69 6e 75 6d 20 | 6f 66 20 62 6b 67 6e 64 |e linum |of bkgnd|
|00003ef0| 20 66 69 65 6c 64 20 28 | 66 2b 32 29 0d 65 78 69 | field (|f+2).exi|
|00003f00| 74 20 72 65 70 65 61 74 | 0d 65 6e 64 20 69 66 0d |t repeat|.end if.|
|00003f10| 65 6e 64 20 72 65 70 65 | 61 74 0d 69 66 20 66 6f |end repe|at.if fo|
|00003f20| 75 6e 64 20 69 73 20 74 | 72 75 65 20 74 68 65 6e |und is t|rue then|
|00003f30| 20 65 78 69 74 20 72 65 | 70 65 61 74 0d 65 6e 64 | exit re|peat.end|
|00003f40| 20 72 65 70 65 61 74 0d | 65 6c 73 65 0d 67 6f 20 | repeat.|else.go |
|00003f50| 74 6f 20 63 61 72 64 20 | 32 34 20 6f 66 20 73 74 |to card |24 of st|
|00003f60| 61 63 6b 20 22 44 61 74 | 65 20 42 6f 6f 6b 22 0d |ack "Dat|e Book".|
|00003f70| 65 6e 64 20 69 66 0d 72 | 65 74 75 72 6e 20 66 6f |end if.r|eturn fo|
|00003f80| 75 6e 64 0d 65 6e 64 20 | 64 72 6f 70 48 6f 6c 69 |und.end |dropHoli|
|00003f90| 64 61 79 0d 0d 66 75 6e | 63 74 69 6f 6e 20 61 64 |day..fun|ction ad|
|00003fa0| 64 48 6f 6c 69 64 61 79 | 20 66 61 6d 69 6c 79 0d |dHoliday| family.|
|00003fb0| 63 68 61 6e 67 65 43 75 | 72 73 6f 72 20 34 0d 70 |changeCu|rsor 4.p|
|00003fc0| 75 74 20 22 43 68 72 69 | 73 74 6d 61 73 2c 20 22 |ut "Chri|stmas, "|
|00003fd0| 26 66 61 6d 69 6c 79 20 | 69 6e 74 6f 20 65 76 65 |&family |into eve|
|00003fe0| 6e 74 0d 67 6f 20 74 6f | 20 63 61 72 64 20 22 4d |nt.go to| card "M|
|00003ff0| 61 73 74 65 72 20 45 76 | 65 6e 74 20 4c 69 73 74 |aster Ev|ent List|
|00004000| 22 20 6f 66 20 73 74 61 | 63 6b 20 22 4b 65 65 70 |" of sta|ck "Keep|
|00004010| 5f 69 6e 5f 54 6f 75 63 | 68 22 0d 70 75 74 20 6f |_in_Touc|h".put o|
|00004020| 66 66 73 65 74 28 65 76 | 65 6e 74 2c 20 63 61 72 |ffset(ev|ent, car|
|00004030| 64 20 66 69 65 6c 64 20 | 22 4d 61 73 74 65 72 20 |d field |"Master |
|00004040| 45 76 65 6e 74 20 4c 69 | 73 74 22 29 20 69 6e 74 |Event Li|st") int|
|00004050| 6f 20 63 0d 69 66 20 63 | 20 3e 20 30 20 74 68 65 |o c.if c| > 0 the|
|00004060| 6e 0d 67 6f 20 74 6f 20 | 63 61 72 64 20 32 34 20 |n.go to |card 24 |
|00004070| 6f 66 20 73 74 61 63 6b | 20 22 44 61 74 65 20 42 |of stack| "Date B|
|00004080| 6f 6f 6b 22 0d 72 65 74 | 75 72 6e 20 66 61 6c 73 |ook".ret|urn fals|
|00004090| 65 0d 65 6c 73 65 0d 70 | 75 74 20 22 31 32 2f 32 |e.else.p|ut "12/2|
|000040a0| 35 2f 30 30 2c 20 22 26 | 65 76 65 6e 74 26 72 65 |5/00, "&|event&re|
|000040b0| 74 75 72 6e 20 62 65 66 | 6f 72 65 20 63 61 72 64 |turn bef|ore card|
|000040c0| 20 66 69 65 6c 64 20 22 | 4d 61 73 74 65 72 20 45 | field "|Master E|
|000040d0| 76 65 6e 74 20 4c 69 73 | 74 22 0d 70 75 74 20 66 |vent Lis|t".put f|
|000040e0| 61 6c 73 65 20 69 6e 74 | 6f 20 66 6f 75 6e 64 0d |alse int|o found.|
|000040f0| 72 65 70 65 61 74 20 77 | 69 74 68 20 63 72 64 20 |repeat w|ith crd |
|00004100| 3d 20 32 34 20 74 6f 20 | 32 36 0d 67 6f 20 74 6f |= 24 to |26.go to|
|00004110| 20 63 61 72 64 20 63 72 | 64 20 6f 66 20 73 74 61 | card cr|d of sta|
|00004120| 63 6b 20 22 44 61 74 65 | 20 42 6f 6f 6b 22 0d 69 |ck "Date| Book".i|
|00004130| 66 20 63 72 64 20 3d 20 | 32 34 0d 74 68 65 6e 20 |f crd = |24.then |
|00004140| 70 75 74 20 35 20 69 6e | 74 6f 20 73 74 61 72 74 |put 5 in|to start|
|00004150| 46 6c 64 20 2d 2d 32 32 | 20 69 6e 74 6f 20 6c 6f |Fld --22| into lo|
|00004160| 0d 65 6c 73 65 20 70 75 | 74 20 34 20 69 6e 74 6f |.else pu|t 4 into|
|00004170| 20 73 74 61 72 74 46 6c | 64 20 2d 2d 31 20 69 6e | startFl|d --1 in|
|00004180| 74 6f 20 6c 6f 0d 72 65 | 70 65 61 74 20 77 69 74 |to lo.re|peat wit|
|00004190| 68 20 66 20 3d 20 73 74 | 61 72 74 46 6c 64 20 74 |h f = st|artFld t|
|000041a0| 6f 20 35 20 2d 2d 62 74 | 6e 20 3d 20 6c 6f 20 74 |o 5 --bt|n = lo t|
|000041b0| 6f 20 34 32 0d 72 65 70 | 65 61 74 20 77 69 74 68 |o 42.rep|eat with|
|000041c0| 20 6c 69 6e 75 6d 20 3d | 20 31 20 74 6f 20 32 31 | linum =| 1 to 21|
|000041d0| 0d 69 66 20 6c 69 6e 65 | 20 6c 69 6e 75 6d 20 6f |.if line| linum o|
|000041e0| 66 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 66 20 |f bkgnd |field f |
|000041f0| 69 73 20 65 6d 70 74 79 | 20 74 68 65 6e 0d 70 75 |is empty| then.pu|
|00004200| 74 20 74 72 75 65 20 69 | 6e 74 6f 20 66 6f 75 6e |t true i|nto foun|
|00004210| 64 0d 65 78 69 74 20 72 | 65 70 65 61 74 0d 65 6e |d.exit r|epeat.en|
|00004220| 64 20 69 66 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |d if.end| repeat.|
|00004230| 69 66 20 66 6f 75 6e 64 | 20 69 73 20 74 72 75 65 |if found| is true|
|00004240| 20 74 68 65 6e 20 65 78 | 69 74 20 72 65 70 65 61 | then ex|it repea|
|00004250| 74 0d 65 6e 64 20 72 65 | 70 65 61 74 0d 69 66 20 |t.end re|peat.if |
|00004260| 66 6f 75 6e 64 20 69 73 | 20 74 72 75 65 20 74 68 |found is| true th|
|00004270| 65 6e 20 65 78 69 74 20 | 72 65 70 65 61 74 0d 65 |en exit |repeat.e|
|00004280| 6e 64 20 72 65 70 65 61 | 74 0d 69 66 20 66 6f 75 |nd repea|t.if fou|
|00004290| 6e 64 20 69 73 20 74 72 | 75 65 20 74 68 65 6e 0d |nd is tr|ue then.|
|000042a0| 70 75 74 20 22 32 35 2c | 20 22 26 65 76 65 6e 74 |put "25,| "&event|
|000042b0| 20 69 6e 74 6f 20 6c 69 | 6e 65 20 6c 69 6e 75 6d | into li|ne linum|
|000042c0| 20 6f 66 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 | of bkgn|d field |
|000042d0| 66 0d 70 75 74 20 65 6d | 70 74 79 20 69 6e 74 6f |f.put em|pty into|
|000042e0| 20 6c 69 6e 65 20 6c 69 | 6e 75 6d 20 6f 66 20 62 | line li|num of b|
|000042f0| 6b 67 6e 64 20 66 69 65 | 6c 64 20 28 66 2b 32 29 |kgnd fie|ld (f+2)|
|00004300| 0d 65 6e 64 20 69 66 0d | 65 6e 64 20 69 66 0d 72 |.end if.|end if.r|
|00004310| 65 74 75 72 6e 20 66 6f | 75 6e 64 0d 65 6e 64 20 |eturn fo|und.end |
|00004320| 61 64 64 48 6f 6c 69 64 | 61 79 0d 0d 6f 6e 20 73 |addHolid|ay..on s|
|00004330| 6f 72 74 48 6f 6c 69 64 | 61 79 0d 63 68 61 6e 67 |ortHolid|ay.chang|
|00004340| 65 43 75 72 73 6f 72 20 | 31 0d 73 65 74 20 6c 6f |eCursor |1.set lo|
|00004350| 63 6b 53 63 72 65 65 6e | 20 74 6f 20 74 72 75 65 |ckScreen| to true|
|00004360| 0d 70 75 74 20 65 6d 70 | 74 79 20 69 6e 74 6f 20 |.put emp|ty into |
|00004370| 74 6f 53 6f 72 74 0d 72 | 65 70 65 61 74 20 77 69 |toSort.r|epeat wi|
|00004380| 74 68 20 63 72 64 20 3d | 20 32 34 20 74 6f 20 32 |th crd =| 24 to 2|
|00004390| 36 0d 67 6f 20 74 6f 20 | 63 61 72 64 20 63 72 64 |6.go to |card crd|
|000043a0| 0d 69 66 20 63 72 64 20 | 3d 20 32 34 0d 74 68 65 |.if crd |= 24.the|
|000043b0| 6e 20 70 75 74 20 35 20 | 69 6e 74 6f 20 73 74 61 |n put 5 |into sta|
|000043c0| 72 74 46 6c 64 20 2d 2d | 32 32 20 69 6e 74 6f 20 |rtFld --|22 into |
|000043d0| 6c 6f 0d 65 6c 73 65 20 | 70 75 74 20 34 20 69 6e |lo.else |put 4 in|
|000043e0| 74 6f 20 73 74 61 72 74 | 46 6c 64 20 2d 2d 31 20 |to start|Fld --1 |
|000043f0| 69 6e 74 6f 20 6c 6f 0d | 72 65 70 65 61 74 20 77 |into lo.|repeat w|
|00004400| 69 74 68 20 66 20 3d 20 | 73 74 61 72 74 46 6c 64 |ith f = |startFld|
|00004410| 20 74 6f 20 35 0d 72 65 | 70 65 61 74 20 77 69 74 | to 5.re|peat wit|
|00004420| 68 20 6c 69 6e 75 6d 20 | 3d 20 31 20 74 6f 20 32 |h linum |= 1 to 2|
|00004430| 31 0d 69 66 20 6c 69 6e | 65 20 6c 69 6e 75 6d 20 |1.if lin|e linum |
|00004440| 6f 66 20 62 6b 67 6e 64 | 20 66 69 65 6c 64 20 66 |of bkgnd| field f|
|00004450| 20 69 73 20 6e 6f 74 20 | 65 6d 70 74 79 20 74 68 | is not |empty th|
|00004460| 65 6e 0d 70 75 74 20 28 | 6c 69 6e 65 20 6c 69 6e |en.put (|line lin|
|00004470| 75 6d 20 6f 66 20 62 6b | 67 6e 64 20 66 69 65 6c |um of bk|gnd fiel|
|00004480| 64 20 66 29 20 61 66 74 | 65 72 20 74 6f 53 6f 72 |d f) aft|er toSor|
|00004490| 74 0d 69 66 20 28 6c 69 | 6e 65 20 6c 69 6e 75 6d |t.if (li|ne linum|
|000044a0| 20 6f 66 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 | of bkgn|d field |
|000044b0| 28 66 2b 32 29 29 20 69 | 73 20 6e 6f 74 20 65 6d |(f+2)) i|s not em|
|000044c0| 70 74 79 0d 74 68 65 6e | 20 70 75 74 20 22 2c 22 |pty.then| put ","|
|000044d0| 26 28 6c 69 6e 65 20 6c | 69 6e 75 6d 20 6f 66 20 |&(line l|inum of |
|000044e0| 62 6b 67 6e 64 20 66 69 | 65 6c 64 20 28 66 2b 32 |bkgnd fi|eld (f+2|
|000044f0| 29 29 20 61 66 74 65 72 | 20 74 6f 53 6f 72 74 0d |)) after| toSort.|
|00004500| 70 75 74 20 72 65 74 75 | 72 6e 20 61 66 74 65 72 |put retu|rn after|
|00004510| 20 74 6f 53 6f 72 74 0d | 65 6e 64 20 69 66 0d 65 | toSort.|end if.e|
|00004520| 6e 64 20 72 65 70 65 61 | 74 0d 65 6e 64 20 72 65 |nd repea|t.end re|
|00004530| 70 65 61 74 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |peat.end| repeat.|
|00004540| 63 68 61 6e 67 65 43 75 | 72 73 6f 72 20 32 0d 67 |changeCu|rsor 2.g|
|00004550| 6f 20 74 6f 20 73 74 61 | 63 6b 20 22 4b 49 54 20 |o to sta|ck "KIT |
|00004560| 57 6f 72 6b 20 53 70 61 | 63 65 22 0d 72 65 70 65 |Work Spa|ce".repe|
|00004570| 61 74 20 77 69 74 68 20 | 6c 69 6e 75 6d 20 3d 20 |at with |linum = |
|00004580| 31 20 74 6f 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |1 to the| number |
|00004590| 6f 66 20 6c 69 6e 65 73 | 20 69 6e 20 74 6f 53 6f |of lines| in toSo|
|000045a0| 72 74 0d 69 66 20 6c 69 | 6e 75 6d 20 3e 20 74 68 |rt.if li|num > th|
|000045b0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 63 61 72 64 |e number| of card|
|000045c0| 73 20 74 68 65 6e 20 64 | 6f 4d 65 6e 75 20 22 4e |s then d|oMenu "N|
|000045d0| 65 77 20 43 61 72 64 22 | 0d 65 6c 73 65 20 67 6f |ew Card"|.else go|
|000045e0| 20 74 6f 20 63 61 72 64 | 20 6c 69 6e 75 6d 0d 70 | to card| linum.p|
|000045f0| 75 74 20 6c 69 6e 65 20 | 6c 69 6e 75 6d 20 6f 66 |ut line |linum of|
|00004600| 20 74 6f 53 6f 72 74 20 | 69 6e 74 6f 20 66 69 65 | toSort |into fie|
|00004610| 6c 64 20 22 53 6f 72 74 | 49 74 65 6d 22 0d 65 6e |ld "Sort|Item".en|
|00004620| 64 20 72 65 70 65 61 74 | 0d 63 68 61 6e 67 65 43 |d repeat|.changeC|
|00004630| 75 72 73 6f 72 20 33 0d | 67 6f 20 74 6f 20 63 61 |ursor 3.|go to ca|
|00004640| 72 64 20 31 0d 73 6f 72 | 74 20 62 79 20 66 69 65 |rd 1.sor|t by fie|
|00004650| 6c 64 20 22 53 6f 72 74 | 49 74 65 6d 22 0d 70 75 |ld "Sort|Item".pu|
|00004660| 74 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |t the nu|mber of |
|00004670| 63 61 72 64 73 20 69 6e | 74 6f 20 6e 75 6d 49 74 |cards in|to numIt|
|00004680| 65 6d 73 0d 67 6f 20 74 | 6f 20 63 61 72 64 20 31 |ems.go t|o card 1|
|00004690| 0d 70 75 74 20 66 69 65 | 6c 64 20 22 53 6f 72 74 |.put fie|ld "Sort|
|000046a0| 49 74 65 6d 22 26 72 65 | 74 75 72 6e 20 69 6e 74 |Item"&re|turn int|
|000046b0| 6f 20 74 6f 53 6f 72 74 | 0d 67 6f 20 74 6f 20 63 |o toSort|.go to c|
|000046c0| 61 72 64 20 32 0d 63 68 | 61 6e 67 65 43 75 72 73 |ard 2.ch|angeCurs|
|000046d0| 6f 72 20 34 0d 72 65 70 | 65 61 74 20 66 6f 72 20 |or 4.rep|eat for |
|000046e0| 6e 75 6d 49 74 65 6d 73 | 2d 31 0d 70 75 74 20 66 |numItems|-1.put f|
|000046f0| 69 65 6c 64 20 22 53 6f | 72 74 49 74 65 6d 22 26 |ield "So|rtItem"&|
|00004700| 72 65 74 75 72 6e 20 61 | 66 74 65 72 20 74 6f 53 |return a|fter toS|
|00004710| 6f 72 74 0d 64 6f 4d 65 | 6e 75 20 22 44 65 6c 65 |ort.doMe|nu "Dele|
|00004720| 74 65 20 43 61 72 64 22 | 0d 65 6e 64 20 72 65 70 |te Card"|.end rep|
|00004730| 65 61 74 0d 70 75 74 20 | 74 68 65 20 75 73 65 72 |eat.put |the user|
|00004740| 4c 65 76 65 6c 20 69 6e | 74 6f 20 6f 6c 64 4c 65 |Level in|to oldLe|
|00004750| 76 65 6c 0d 73 65 74 20 | 74 68 65 20 75 73 65 72 |vel.set |the user|
|00004760| 4c 65 76 65 6c 20 74 6f | 20 33 0d 64 6f 4d 65 6e |Level to| 3.doMen|
|00004770| 75 20 22 43 6f 6d 70 61 | 63 74 20 53 74 61 63 6b |u "Compa|ct Stack|
|00004780| 22 0d 63 68 61 6e 67 65 | 43 75 72 73 6f 72 20 35 |".change|Cursor 5|
|00004790| 0d 73 65 74 20 74 68 65 | 20 75 73 65 72 4c 65 76 |.set the| userLev|
|000047a0| 65 6c 20 74 6f 20 6f 6c | 64 4c 65 76 65 6c 0d 67 |el to ol|dLevel.g|
|000047b0| 6f 20 74 6f 20 63 61 72 | 64 20 32 34 20 6f 66 20 |o to car|d 24 of |
|000047c0| 73 74 61 63 6b 20 22 44 | 61 74 65 20 42 6f 6f 6b |stack "D|ate Book|
|000047d0| 22 0d 70 75 74 20 35 20 | 69 6e 74 6f 20 66 0d 72 |".put 5 |into f.r|
|000047e0| 65 70 65 61 74 20 77 68 | 69 6c 65 20 74 6f 53 6f |epeat wh|ile toSo|
|000047f0| 72 74 20 69 73 20 6e 6f | 74 20 65 6d 70 74 79 0d |rt is no|t empty.|
|00004800| 70 75 74 20 6d 69 6e 28 | 20 32 31 2c 20 74 68 65 |put min(| 21, the|
|00004810| 20 6e 75 6d 62 65 72 20 | 6f 66 20 6c 69 6e 65 73 | number |of lines|
|00004820| 20 69 6e 20 74 6f 53 6f | 72 74 29 20 69 6e 74 6f | in toSo|rt) into|
|00004830| 20 6c 69 6d 69 74 0d 70 | 75 74 20 6c 69 6e 65 20 | limit.p|ut line |
|00004840| 31 20 74 6f 20 6c 69 6d | 69 74 20 6f 66 20 74 6f |1 to lim|it of to|
|00004850| 53 6f 72 74 20 69 6e 74 | 6f 20 62 6b 67 6e 64 20 |Sort int|o bkgnd |
|00004860| 66 69 65 6c 64 20 66 0d | 64 65 6c 65 74 65 20 6c |field f.|delete l|
|00004870| 69 6e 65 20 31 20 74 6f | 20 6c 69 6d 69 74 20 6f |ine 1 to| limit o|
|00004880| 66 20 74 6f 53 6f 72 74 | 0d 70 75 74 20 65 6d 70 |f toSort|.put emp|
|00004890| 74 79 20 69 6e 74 6f 20 | 62 6b 67 6e 64 20 66 69 |ty into |bkgnd fi|
|000048a0| 65 6c 64 20 28 66 2b 32 | 29 0d 70 75 74 20 72 65 |eld (f+2|).put re|
|000048b0| 74 75 72 6e 20 69 6e 74 | 6f 20 6c 69 6e 65 20 32 |turn int|o line 2|
|000048c0| 32 20 6f 66 20 62 6b 67 | 6e 64 20 66 69 65 6c 64 |2 of bkg|nd field|
|000048d0| 20 28 66 2b 32 29 0d 72 | 65 70 65 61 74 20 77 69 | (f+2).r|epeat wi|
|000048e0| 74 68 20 6c 69 6e 75 6d | 20 3d 20 31 20 74 6f 20 |th linum| = 1 to |
|000048f0| 6c 69 6d 69 74 0d 69 66 | 20 74 68 65 20 6e 75 6d |limit.if| the num|
|00004900| 62 65 72 20 6f 66 20 69 | 74 65 6d 73 20 69 6e 20 |ber of i|tems in |
|00004910| 6c 69 6e 65 20 6c 69 6e | 75 6d 20 6f 66 20 62 6b |line lin|um of bk|
|00004920| 67 6e 64 20 66 69 65 6c | 64 20 66 20 b3 20 35 20 |gnd fiel|d f . 5 |
|00004930| 74 68 65 6e 0d 70 75 74 | 20 6c 61 73 74 20 63 68 |then.put| last ch|
|00004940| 61 72 20 6f 66 20 6c 61 | 73 74 20 69 74 65 6d 20 |ar of la|st item |
|00004950| 6f 66 20 6c 69 6e 65 20 | 6c 69 6e 75 6d 20 6f 66 |of line |linum of|
|00004960| 20 62 6b 67 6e 64 20 66 | 69 65 6c 64 20 66 20 c2 | bkgnd f|ield f .|
|00004970| 0d 69 6e 74 6f 20 6c 69 | 6e 65 20 6c 69 6e 75 6d |.into li|ne linum|
|00004980| 20 6f 66 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 | of bkgn|d field |
|00004990| 28 66 2b 32 29 0d 64 65 | 6c 65 74 65 20 6c 61 73 |(f+2).de|lete las|
|000049a0| 74 20 69 74 65 6d 20 6f | 66 20 6c 69 6e 65 20 6c |t item o|f line l|
|000049b0| 69 6e 75 6d 20 6f 66 20 | 62 6b 67 6e 64 20 66 69 |inum of |bkgnd fi|
|000049c0| 65 6c 64 20 66 0d 65 6e | 64 20 69 66 0d 65 6e 64 |eld f.en|d if.end|
|000049d0| 20 72 65 70 65 61 74 0d | 69 66 20 66 20 3d 20 35 | repeat.|if f = 5|
|000049e0| 20 74 68 65 6e 0d 70 75 | 74 20 34 20 69 6e 74 6f | then.pu|t 4 into|
|000049f0| 20 66 0d 67 6f 20 6e 65 | 78 74 0d 65 6c 73 65 0d | f.go ne|xt.else.|
|00004a00| 70 75 74 20 35 20 69 6e | 74 6f 20 66 0d 65 6e 64 |put 5 in|to f.end|
|00004a10| 20 69 66 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 63 | if.end |repeat.c|
|00004a20| 68 61 6e 67 65 43 75 72 | 73 6f 72 20 36 0d 72 65 |hangeCur|sor 6.re|
|00004a30| 70 65 61 74 20 77 68 69 | 6c 65 20 74 68 65 20 6e |peat whi|le the n|
|00004a40| 75 6d 62 65 72 20 6f 66 | 20 74 68 69 73 20 63 61 |umber of| this ca|
|00004a50| 72 64 20 3c 20 32 37 0d | 70 75 74 20 65 6d 70 74 |rd < 27.|put empt|
|00004a60| 79 20 69 6e 74 6f 20 62 | 6b 67 6e 64 20 66 69 65 |y into b|kgnd fie|
|00004a70| 6c 64 20 66 0d 69 66 20 | 66 20 3d 20 35 20 74 68 |ld f.if |f = 5 th|
|00004a80| 65 6e 0d 70 75 74 20 34 | 20 69 6e 74 6f 20 66 0d |en.put 4| into f.|
|00004a90| 67 6f 20 6e 65 78 74 0d | 65 6c 73 65 0d 70 75 74 |go next.|else.put|
|00004aa0| 20 35 20 69 6e 74 6f 20 | 66 0d 65 6e 64 20 69 66 | 5 into |f.end if|
|00004ab0| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 67 6f 20 74 |.end rep|eat.go t|
|00004ac0| 6f 20 63 61 72 64 20 32 | 34 0d 65 6e 64 20 73 6f |o card 2|4.end so|
|00004ad0| 72 74 48 6f 6c 69 64 61 | 79 0d 0d 66 75 6e 63 74 |rtHolida|y..funct|
|00004ae0| 69 6f 6e 20 61 64 64 49 | 74 65 6d 20 65 76 65 6e |ion addI|tem even|
|00004af0| 74 0d 63 68 61 6e 67 65 | 43 75 72 73 6f 72 20 33 |t.change|Cursor 3|
|00004b00| 0d 70 75 74 20 65 76 65 | 6e 74 20 69 6e 74 6f 20 |.put eve|nt into |
|00004b10| 69 6e 74 61 63 74 0d 70 | 75 74 20 69 74 65 6d 20 |intact.p|ut item |
|00004b20| 31 20 6f 66 20 65 76 65 | 6e 74 20 69 6e 74 6f 20 |1 of eve|nt into |
|00004b30| 65 64 61 74 65 0d 64 65 | 6c 65 74 65 20 69 74 65 |edate.de|lete ite|
|00004b40| 6d 20 31 20 6f 66 20 65 | 76 65 6e 74 0d 67 6f 20 |m 1 of e|vent.go |
|00004b50| 74 6f 20 63 61 72 64 20 | 22 4d 61 73 74 65 72 20 |to card |"Master |
|00004b60| 45 76 65 6e 74 20 4c 69 | 73 74 22 20 6f 66 20 73 |Event Li|st" of s|
|00004b70| 74 61 63 6b 20 22 4b 65 | 65 70 5f 69 6e 5f 54 6f |tack "Ke|ep_in_To|
|00004b80| 75 63 68 22 0d 70 75 74 | 20 6f 66 66 73 65 74 28 |uch".put| offset(|
|00004b90| 65 76 65 6e 74 2c 20 63 | 61 72 64 20 66 69 65 6c |event, c|ard fiel|
|00004ba0| 64 20 22 4d 61 73 74 65 | 72 20 45 76 65 6e 74 20 |d "Maste|r Event |
|00004bb0| 4c 69 73 74 22 29 20 69 | 6e 74 6f 20 63 0d 69 66 |List") i|nto c.if|
|00004bc0| 20 63 20 3e 20 30 20 74 | 68 65 6e 0d 70 75 74 20 | c > 0 t|hen.put |
|00004bd0| 65 76 65 6e 74 20 69 6e | 74 6f 20 6f 6c 64 45 6e |event in|to oldEn|
|00004be0| 74 72 79 0d 73 75 62 74 | 72 61 63 74 20 31 20 66 |try.subt|ract 1 f|
|00004bf0| 72 6f 6d 20 63 0d 72 65 | 70 65 61 74 20 77 68 69 |rom c.re|peat whi|
|00004c00| 6c 65 20 28 63 68 61 72 | 20 63 20 6f 66 20 63 61 |le (char| c of ca|
|00004c10| 72 64 20 66 69 65 6c 64 | 20 22 4d 61 73 74 65 72 |rd field| "Master|
|00004c20| 20 45 76 65 6e 74 20 4c | 69 73 74 22 29 20 ad 20 | Event L|ist") . |
|00004c30| 72 65 74 75 72 6e 0d 70 | 75 74 20 63 68 61 72 20 |return.p|ut char |
|00004c40| 63 20 6f 66 20 63 61 72 | 64 20 66 69 65 6c 64 20 |c of car|d field |
|00004c50| 22 4d 61 73 74 65 72 20 | 45 76 65 6e 74 20 4c 69 |"Master |Event Li|
|00004c60| 73 74 22 20 62 65 66 6f | 72 65 20 6f 6c 64 45 6e |st" befo|re oldEn|
|00004c70| 74 72 79 0d 73 75 62 74 | 72 61 63 74 20 31 20 66 |try.subt|ract 1 f|
|00004c80| 72 6f 6d 20 63 0d 69 66 | 20 63 20 b2 20 30 20 74 |rom c.if| c . 0 t|
|00004c90| 68 65 6e 20 65 78 69 74 | 20 72 65 70 65 61 74 0d |hen exit| repeat.|
|00004ca0| 65 6e 64 20 72 65 70 65 | 61 74 0d 69 66 20 6f 6c |end repe|at.if ol|
|00004cb0| 64 45 6e 74 72 79 20 69 | 73 20 69 6e 20 69 6e 74 |dEntry i|s in int|
|00004cc0| 61 63 74 0d 74 68 65 6e | 20 65 78 69 74 20 61 64 |act.then| exit ad|
|00004cd0| 64 49 74 65 6d 0d 65 6c | 73 65 20 70 75 74 20 64 |dItem.el|se put d|
|00004ce0| 72 6f 70 49 74 65 6d 28 | 6f 6c 64 45 6e 74 72 79 |ropItem(|oldEntry|
|00004cf0| 29 20 69 6e 74 6f 20 69 | 74 0d 65 6e 64 20 69 66 |) into i|t.end if|
|00004d00| 0d 63 68 61 6e 67 65 43 | 75 72 73 6f 72 20 34 0d |.changeC|ursor 4.|
|00004d10| 67 6f 20 74 6f 20 73 74 | 61 63 6b 20 22 44 61 74 |go to st|ack "Dat|
|00004d20| 65 20 42 6f 6f 6b 22 0d | 69 66 20 65 64 61 74 65 |e Book".|if edate|
|00004d30| 20 69 73 20 6e 6f 74 20 | 65 6d 70 74 79 20 74 68 | is not |empty th|
|00004d40| 65 6e 0d 63 6f 6e 76 65 | 72 74 20 65 64 61 74 65 |en.conve|rt edate|
|00004d50| 20 74 6f 20 64 61 74 65 | 49 74 65 6d 73 0d 69 66 | to date|Items.if|
|00004d60| 20 74 68 65 20 72 65 73 | 75 6c 74 20 63 6f 6e 74 | the res|ult cont|
|00004d70| 61 69 6e 73 20 22 69 6e | 76 61 6c 69 64 20 64 61 |ains "in|valid da|
|00004d80| 74 65 22 20 74 68 65 6e | 20 72 65 74 75 72 6e 20 |te" then| return |
|00004d90| 66 61 6c 73 65 0d 70 75 | 74 20 69 74 65 6d 20 32 |false.pu|t item 2|
|00004da0| 20 6f 66 20 65 64 61 74 | 65 20 69 6e 74 6f 20 6d | of edat|e into m|
|00004db0| 6f 0d 70 75 74 20 69 74 | 65 6d 20 33 20 6f 66 20 |o.put it|em 3 of |
|00004dc0| 65 64 61 74 65 20 69 6e | 74 6f 20 64 61 79 0d 70 |edate in|to day.p|
|00004dd0| 75 74 20 28 64 61 79 26 | 22 2c 22 26 65 76 65 6e |ut (day&|","&even|
|00004de0| 74 29 20 69 6e 74 6f 20 | 65 6e 74 72 79 0d 67 6f |t) into |entry.go|
|00004df0| 20 74 6f 20 63 61 72 64 | 20 28 28 6d 6f 2d 31 29 | to card| ((mo-1)|
|00004e00| 2a 32 20 2b 20 31 29 0d | 69 66 20 64 61 79 20 3c |*2 + 1).|if day <|
|00004e10| 20 31 36 20 74 68 65 6e | 20 70 75 74 20 34 20 69 | 16 then| put 4 i|
|00004e20| 6e 74 6f 20 66 20 65 6c | 73 65 20 70 75 74 20 35 |nto f el|se put 5|
|00004e30| 20 69 6e 74 6f 20 66 0d | 70 75 74 20 62 6b 67 6e | into f.|put bkgn|
|00004e40| 64 20 66 69 65 6c 64 20 | 66 20 69 6e 74 6f 20 6d |d field |f into m|
|00004e50| 79 46 6c 64 0d 70 75 74 | 20 32 32 20 69 6e 74 6f |yFld.put| 22 into|
|00004e60| 20 6c 6f 0d 70 75 74 20 | 30 20 69 6e 74 6f 20 68 | lo.put |0 into h|
|00004e70| 69 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 6c 6f 45 |i.put 0 |into loE|
|00004e80| 6d 70 74 79 0d 70 75 74 | 20 32 32 20 69 6e 74 6f |mpty.put| 22 into|
|00004e90| 20 68 69 45 6d 70 74 79 | 0d 70 75 74 20 30 20 69 | hiEmpty|.put 0 i|
|00004ea0| 6e 74 6f 20 70 72 65 76 | 45 6e 74 72 79 0d 70 75 |nto prev|Entry.pu|
|00004eb0| 74 20 32 32 20 69 6e 74 | 6f 20 6e 65 78 74 45 6e |t 22 int|o nextEn|
|00004ec0| 74 72 79 0d 69 66 20 64 | 61 79 20 3c 20 31 36 20 |try.if d|ay < 16 |
|00004ed0| 74 68 65 6e 20 70 75 74 | 20 20 30 20 69 6e 74 6f |then put|  0 into|
|00004ee0| 20 70 72 65 76 44 61 79 | 20 65 6c 73 65 20 70 75 | prevDay| else pu|
|00004ef0| 74 20 31 35 20 69 6e 74 | 6f 20 70 72 65 76 44 61 |t 15 int|o prevDa|
|00004f00| 79 0d 69 66 20 64 61 79 | 20 3c 20 31 36 20 74 68 |y.if day| < 16 th|
|00004f10| 65 6e 20 70 75 74 20 31 | 36 20 69 6e 74 6f 20 6e |en put 1|6 into n|
|00004f20| 65 78 74 44 61 79 20 65 | 6c 73 65 20 70 75 74 20 |extDay e|lse put |
|00004f30| 33 32 20 69 6e 74 6f 20 | 6e 65 78 74 44 61 79 0d |32 into |nextDay.|
|00004f40| 70 75 74 20 30 20 69 6e | 74 6f 20 74 65 73 74 0d |put 0 in|to test.|
|00004f50| 72 65 70 65 61 74 20 77 | 69 74 68 20 69 20 3d 20 |repeat w|ith i = |
|00004f60| 31 20 74 6f 20 32 31 0d | 69 66 20 6c 69 6e 65 20 |1 to 21.|if line |
|00004f70| 69 20 6f 66 20 6d 79 46 | 6c 64 20 69 73 20 65 6d |i of myF|ld is em|
|00004f80| 70 74 79 20 74 68 65 6e | 0d 69 66 20 74 65 73 74 |pty then|.if test|
|00004f90| 20 3c 20 64 61 79 20 74 | 68 65 6e 20 70 75 74 20 | < day t|hen put |
|00004fa0| 69 20 69 6e 74 6f 20 6c | 6f 45 6d 70 74 79 0d 69 |i into l|oEmpty.i|
|00004fb0| 66 20 68 69 45 6d 70 74 | 79 20 3d 20 32 32 20 61 |f hiEmpt|y = 22 a|
|00004fc0| 6e 64 20 74 65 73 74 20 | b3 20 64 61 79 20 74 68 |nd test |. day th|
|00004fd0| 65 6e 20 70 75 74 20 69 | 20 69 6e 74 6f 20 68 69 |en put i| into hi|
|00004fe0| 45 6d 70 74 79 0d 70 75 | 74 20 30 20 69 6e 74 6f |Empty.pu|t 0 into|
|00004ff0| 20 69 74 0d 65 6c 73 65 | 0d 70 75 74 20 69 74 65 | it.else|.put ite|
|00005000| 6d 20 31 20 6f 66 20 6c | 69 6e 65 20 69 20 6f 66 |m 1 of l|ine i of|
|00005010| 20 6d 79 46 6c 64 20 69 | 6e 74 6f 20 74 65 73 74 | myFld i|nto test|
|00005020| 0d 69 66 20 6e 65 78 74 | 45 6e 74 72 79 20 3d 20 |.if next|Entry = |
|00005030| 32 32 20 61 6e 64 20 74 | 65 73 74 20 3e 20 64 61 |22 and t|est > da|
|00005040| 79 20 74 68 65 6e 0d 70 | 75 74 20 69 20 69 6e 74 |y then.p|ut i int|
|00005050| 6f 20 6e 65 78 74 45 6e | 74 72 79 0d 70 75 74 20 |o nextEn|try.put |
|00005060| 74 65 73 74 20 69 6e 74 | 6f 20 6e 65 78 74 44 61 |test int|o nextDa|
|00005070| 79 0d 65 6e 64 20 69 66 | 0d 69 66 20 74 65 73 74 |y.end if|.if test|
|00005080| 20 3d 20 64 61 79 20 74 | 68 65 6e 0d 70 75 74 20 | = day t|hen.put |
|00005090| 69 20 69 6e 74 6f 20 68 | 69 0d 69 66 20 6c 6f 20 |i into h|i.if lo |
|000050a0| 3d 20 32 32 20 74 68 65 | 6e 20 70 75 74 20 69 20 |= 22 the|n put i |
|000050b0| 69 6e 74 6f 20 6c 6f 0d | 65 6e 64 20 69 66 0d 69 |into lo.|end if.i|
|000050c0| 66 20 74 65 73 74 20 3c | 20 64 61 79 20 74 68 65 |f test <| day the|
|000050d0| 6e 0d 70 75 74 20 69 20 | 69 6e 74 6f 20 70 72 65 |n.put i |into pre|
|000050e0| 76 45 6e 74 72 79 0d 70 | 75 74 20 74 65 73 74 20 |vEntry.p|ut test |
|000050f0| 69 6e 74 6f 20 70 72 65 | 76 44 61 79 0d 65 6e 64 |into pre|vDay.end|
|00005100| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 72 | if.end |if.end r|
|00005110| 65 70 65 61 74 0d 63 68 | 61 6e 67 65 43 75 72 73 |epeat.ch|angeCurs|
|00005120| 6f 72 20 35 0d 69 66 20 | 6c 6f 20 3d 20 32 32 20 |or 5.if |lo = 22 |
|00005130| 61 6e 64 20 68 69 20 3d | 20 30 20 74 68 65 6e 0d |and hi =| 0 then.|
|00005140| 70 75 74 20 74 72 75 6e | 63 28 28 64 61 79 2d 70 |put trun|c((day-p|
|00005150| 72 65 76 44 61 79 29 2f | 28 6e 65 78 74 44 61 79 |revDay)/|(nextDay|
|00005160| 2d 70 72 65 76 44 61 79 | 29 2a 28 6e 65 78 74 45 |-prevDay|)*(nextE|
|00005170| 6e 74 72 79 2d 70 72 65 | 76 45 6e 74 72 79 29 20 |ntry-pre|vEntry) |
|00005180| c2 0d 2b 70 72 65 76 45 | 6e 74 72 79 29 20 69 6e |..+prevE|ntry) in|
|00005190| 74 6f 20 68 69 0d 70 75 | 74 20 68 69 2b 31 20 69 |to hi.pu|t hi+1 i|
|000051a0| 6e 74 6f 20 6c 6f 0d 72 | 65 70 65 61 74 20 77 69 |nto lo.r|epeat wi|
|000051b0| 74 68 20 69 20 3d 20 6e | 65 78 74 45 6e 74 72 79 |th i = n|extEntry|
|000051c0| 20 2d 20 31 20 64 6f 77 | 6e 20 74 6f 20 70 72 65 | - 1 dow|n to pre|
|000051d0| 76 45 6e 74 72 79 20 2b | 20 31 0d 69 66 20 69 20 |vEntry +| 1.if i |
|000051e0| b3 20 6c 6f 20 61 6e 64 | 20 6c 69 6e 65 20 69 20 |. lo and| line i |
|000051f0| 6f 66 20 6d 79 46 6c 64 | 20 69 73 20 65 6d 70 74 |of myFld| is empt|
|00005200| 79 20 74 68 65 6e 20 70 | 75 74 20 69 20 69 6e 74 |y then p|ut i int|
|00005210| 6f 20 68 69 45 6d 70 74 | 79 0d 69 66 20 69 20 b2 |o hiEmpt|y.if i .|
|00005220| 20 68 69 20 61 6e 64 20 | 6c 69 6e 65 20 69 20 6f | hi and |line i o|
|00005230| 66 20 6d 79 46 6c 64 20 | 69 73 20 65 6d 70 74 79 |f myFld |is empty|
|00005240| 20 74 68 65 6e 0d 70 75 | 74 20 69 20 69 6e 74 6f | then.pu|t i into|
|00005250| 20 6c 6f 45 6d 70 74 79 | 0d 65 78 69 74 20 72 65 | loEmpty|.exit re|
|00005260| 70 65 61 74 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |peat.end| if.end |
|00005270| 72 65 70 65 61 74 0d 65 | 6e 64 20 69 66 0d 69 66 |repeat.e|nd if.if|
|00005280| 20 6c 6f 45 6d 70 74 79 | 20 3e 20 6c 6f 20 74 68 | loEmpty| > lo th|
|00005290| 65 6e 20 70 75 74 20 6c | 6f 45 6d 70 74 79 20 69 |en put l|oEmpty i|
|000052a0| 6e 74 6f 20 69 6e 73 65 | 72 74 4c 69 6e 65 0d 65 |nto inse|rtLine.e|
|000052b0| 6c 73 65 0d 69 66 20 68 | 69 45 6d 70 74 79 20 3c |lse.if h|iEmpty <|
|000052c0| 20 68 69 20 74 68 65 6e | 20 70 75 74 20 68 69 45 | hi then| put hiE|
|000052d0| 6d 70 74 79 20 69 6e 74 | 6f 20 69 6e 73 65 72 74 |mpty int|o insert|
|000052e0| 4c 69 6e 65 0d 65 6c 73 | 65 0d 69 66 20 6c 6f 45 |Line.els|e.if loE|
|000052f0| 6d 70 74 79 3d 6c 6f 2d | 31 20 61 6e 64 20 6c 6f |mpty=lo-|1 and lo|
|00005300| 45 6d 70 74 79 20 3e 20 | 30 20 74 68 65 6e 20 70 |Empty > |0 then p|
|00005310| 75 74 20 6c 6f 45 6d 70 | 74 79 20 69 6e 74 6f 20 |ut loEmp|ty into |
|00005320| 69 6e 73 65 72 74 4c 69 | 6e 65 0d 65 6c 73 65 0d |insertLi|ne.else.|
|00005330| 69 66 20 68 69 45 6d 70 | 74 79 3d 68 69 2b 31 20 |if hiEmp|ty=hi+1 |
|00005340| 61 6e 64 20 68 69 45 6d | 70 74 79 3c 32 32 20 74 |and hiEm|pty<22 t|
|00005350| 68 65 6e 20 70 75 74 20 | 68 69 45 6d 70 74 79 20 |hen put |hiEmpty |
|00005360| 69 6e 74 6f 20 69 6e 73 | 65 72 74 4c 69 6e 65 0d |into ins|ertLine.|
|00005370| 65 6c 73 65 0d 69 66 20 | 6c 6f 45 6d 70 74 79 3e |else.if |loEmpty>|
|00005380| 30 20 61 6e 64 20 28 6c | 6f 2d 6c 6f 45 6d 70 74 |0 and (l|o-loEmpt|
|00005390| 79 20 3c 20 68 69 45 6d | 70 74 79 2d 68 69 20 6f |y < hiEm|pty-hi o|
|000053a0| 72 20 68 69 45 6d 70 74 | 79 b3 32 32 29 20 74 68 |r hiEmpt|y.22) th|
|000053b0| 65 6e 0d 72 65 70 65 61 | 74 20 77 69 74 68 20 69 |en.repea|t with i|
|000053c0| 20 3d 20 6c 6f 45 6d 70 | 74 79 20 74 6f 20 6c 6f | = loEmp|ty to lo|
|000053d0| 2d 32 0d 70 75 74 20 6c | 69 6e 65 20 69 2b 31 20 |-2.put l|ine i+1 |
|000053e0| 6f 66 20 6d 79 46 6c 64 | 20 69 6e 74 6f 20 74 72 |of myFld| into tr|
|000053f0| 61 6e 73 66 4c 69 6e 65 | 0d 70 75 74 20 6c 69 6e |ansfLine|.put lin|
|00005400| 65 20 69 2b 31 20 6f 66 | 20 62 6b 67 6e 64 20 66 |e i+1 of| bkgnd f|
|00005410| 69 65 6c 64 20 28 66 2b | 32 29 20 69 6e 74 6f 20 |ield (f+|2) into |
|00005420| 68 69 67 68 6c 69 74 65 | 0d 70 75 74 20 63 70 79 |highlite|.put cpy|
|00005430| 49 74 65 6d 4e 61 6d 65 | 28 20 66 2c 20 69 2c 20 |ItemName|( f, i, |
|00005440| 74 72 61 6e 73 66 4c 69 | 6e 65 2c 20 68 69 67 68 |transfLi|ne, high|
|00005450| 6c 69 74 65 29 20 69 6e | 74 6f 20 69 74 0d 65 6e |lite) in|to it.en|
|00005460| 64 20 72 65 70 65 61 74 | 0d 70 75 74 20 6c 6f 2d |d repeat|.put lo-|
|00005470| 31 20 69 6e 74 6f 20 69 | 6e 73 65 72 74 4c 69 6e |1 into i|nsertLin|
|00005480| 65 0d 65 6c 73 65 0d 69 | 66 20 68 69 45 6d 70 74 |e.else.i|f hiEmpt|
|00005490| 79 20 3c 20 32 32 20 74 | 68 65 6e 0d 72 65 70 65 |y < 22 t|hen.repe|
|000054a0| 61 74 20 77 69 74 68 20 | 69 20 3d 20 68 69 45 6d |at with |i = hiEm|
|000054b0| 70 74 79 20 64 6f 77 6e | 20 74 6f 20 68 69 2b 32 |pty down| to hi+2|
|000054c0| 0d 70 75 74 20 6c 69 6e | 65 20 69 2d 31 20 6f 66 |.put lin|e i-1 of|
|000054d0| 20 6d 79 46 6c 64 20 69 | 6e 74 6f 20 74 72 61 6e | myFld i|nto tran|
|000054e0| 73 66 4c 69 6e 65 0d 70 | 75 74 20 6c 69 6e 65 20 |sfLine.p|ut line |
|000054f0| 69 2d 31 20 6f 66 20 62 | 6b 67 6e 64 20 66 69 65 |i-1 of b|kgnd fie|
|00005500| 6c 64 20 28 66 2b 32 29 | 20 69 6e 74 6f 20 68 69 |ld (f+2)| into hi|
|00005510| 67 68 6c 69 74 65 0d 70 | 75 74 20 63 70 79 49 74 |ghlite.p|ut cpyIt|
|00005520| 65 6d 4e 61 6d 65 28 20 | 66 2c 20 69 2c 20 74 72 |emName( |f, i, tr|
|00005530| 61 6e 73 66 4c 69 6e 65 | 2c 20 68 69 67 68 6c 69 |ansfLine|, highli|
|00005540| 74 65 29 20 69 6e 74 6f | 20 69 74 0d 65 6e 64 20 |te) into| it.end |
|00005550| 72 65 70 65 61 74 0d 70 | 75 74 20 68 69 2b 31 20 |repeat.p|ut hi+1 |
|00005560| 69 6e 74 6f 20 69 6e 73 | 65 72 74 4c 69 6e 65 0d |into ins|ertLine.|
|00005570| 65 6c 73 65 0d 61 6e 73 | 77 65 72 20 22 44 61 74 |else.ans|wer "Dat|
|00005580| 65 20 42 6f 6f 6b 20 70 | 61 67 65 20 6c 61 63 6b |e Book p|age lack|
|00005590| 73 20 72 6f 6f 6d 20 66 | 6f 72 20 6e 65 77 20 67 |s room f|or new g|
|000055a0| 72 65 65 74 69 6e 67 22 | 0d 72 65 74 75 72 6e 20 |reeting"|.return |
|000055b0| 66 61 6c 73 65 0d 65 6e | 64 20 69 66 0d 65 6e 64 |false.en|d if.end|
|000055c0| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 69 | if.end |if.end i|
|000055d0| 66 0d 65 6e 64 20 69 66 | 0d 65 6e 64 20 69 66 0d |f.end if|.end if.|
|000055e0| 70 75 74 20 63 70 79 49 | 74 65 6d 4e 61 6d 65 28 |put cpyI|temName(|
|000055f0| 20 66 2c 20 69 6e 73 65 | 72 74 4c 69 6e 65 2c 20 | f, inse|rtLine, |
|00005600| 65 6e 74 72 79 2c 20 65 | 6d 70 74 79 29 20 69 6e |entry, e|mpty) in|
|00005610| 74 6f 20 74 6d 70 0d 69 | 66 20 69 74 65 6d 20 31 |to tmp.i|f item 1|
|00005620| 20 6f 66 20 65 76 65 6e | 74 20 63 6f 6e 74 61 69 | of even|t contai|
|00005630| 6e 73 20 22 48 61 6e 6e | 75 6b 61 68 22 20 74 68 |ns "Hann|ukah" th|
|00005640| 65 6e 0d 64 65 6c 65 74 | 65 20 69 74 65 6d 20 31 |en.delet|e item 1|
|00005650| 20 6f 66 20 65 76 65 6e | 74 0d 64 65 6c 65 74 65 | of even|t.delete|
|00005660| 20 63 68 61 72 20 31 20 | 6f 66 20 65 76 65 6e 74 | char 1 |of event|
|00005670| 0d 70 75 74 20 64 72 6f | 70 48 6f 6c 69 64 61 79 |.put dro|pHoliday|
|00005680| 28 65 76 65 6e 74 29 20 | 69 6e 74 6f 20 69 74 0d |(event) |into it.|
|00005690| 65 6e 64 20 69 66 0d 67 | 6f 20 74 6f 20 63 61 72 |end if.g|o to car|
|000056a0| 64 20 22 4d 61 73 74 65 | 72 20 45 76 65 6e 74 20 |d "Maste|r Event |
|000056b0| 4c 69 73 74 22 20 6f 66 | 20 73 74 61 63 6b 20 22 |List" of| stack "|
|000056c0| 4b 65 65 70 5f 69 6e 5f | 54 6f 75 63 68 22 0d 70 |Keep_in_|Touch".p|
|000056d0| 75 74 20 69 6e 74 61 63 | 74 26 72 65 74 75 72 6e |ut intac|t&return|
|000056e0| 20 62 65 66 6f 72 65 20 | 63 61 72 64 20 66 69 65 | before |card fie|
|000056f0| 6c 64 20 22 4d 61 73 74 | 65 72 20 45 76 65 6e 74 |ld "Mast|er Event|
|00005700| 20 4c 69 73 74 22 0d 67 | 6f 20 74 6f 20 63 61 72 | List".g|o to car|
|00005710| 64 20 28 28 6d 6f 2d 31 | 29 2a 32 20 2b 20 31 29 |d ((mo-1|)*2 + 1)|
|00005720| 20 6f 66 20 73 74 61 63 | 6b 20 22 44 61 74 65 20 | of stac|k "Date |
|00005730| 42 6f 6f 6b 22 0d 72 65 | 74 75 72 6e 20 74 72 75 |Book".re|turn tru|
|00005740| 65 0d 65 6c 73 65 0d 72 | 65 74 75 72 6e 20 66 61 |e.else.r|eturn fa|
|00005750| 6c 73 65 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 61 |lse.end |if.end a|
|00005760| 64 64 49 74 65 6d 0d 0d | 66 75 6e 63 74 69 6f 6e |ddItem..|function|
|00005770| 20 63 6b 44 61 74 65 20 | 61 44 61 74 65 0d 69 66 | ckDate |aDate.if|
|00005780| 20 61 44 61 74 65 20 69 | 73 20 65 6d 70 74 79 20 | aDate i|s empty |
|00005790| 74 68 65 6e 20 72 65 74 | 75 72 6e 20 65 6d 70 74 |then ret|urn empt|
|000057a0| 79 0d 70 75 74 20 61 44 | 61 74 65 20 69 6e 74 6f |y.put aD|ate into|
|000057b0| 20 69 74 0d 70 75 74 20 | 66 61 6c 73 65 20 69 6e | it.put |false in|
|000057c0| 74 6f 20 63 68 65 63 6b | 0d 72 65 70 65 61 74 20 |to check|.repeat |
|000057d0| 77 68 69 6c 65 20 63 68 | 65 63 6b 20 69 73 20 66 |while ch|eck is f|
|000057e0| 61 6c 73 65 0d 70 75 74 | 20 74 72 75 65 20 69 6e |alse.put| true in|
|000057f0| 74 6f 20 63 68 65 63 6b | 0d 69 66 20 6e 75 6d 53 |to check|.if numS|
|00005800| 6c 61 73 68 28 69 74 29 | 20 74 68 65 6e 20 63 6f |lash(it)| then co|
|00005810| 6e 76 65 72 74 20 69 74 | 20 74 6f 20 64 61 74 65 |nvert it| to date|
|00005820| 49 74 65 6d 73 0d 65 6c | 73 65 20 70 75 74 20 66 |Items.el|se put f|
|00005830| 61 6c 73 65 20 69 6e 74 | 6f 20 63 68 65 63 6b 0d |alse int|o check.|
|00005840| 69 66 20 63 68 65 63 6b | 20 69 73 20 66 61 6c 73 |if check| is fals|
|00005850| 65 20 6f 72 20 74 68 65 | 20 72 65 73 75 6c 74 20 |e or the| result |
|00005860| 69 73 20 6e 6f 74 20 65 | 6d 70 74 79 20 6f 72 20 |is not e|mpty or |
|00005870| 69 74 65 6d 20 31 20 6f | 66 20 69 74 20 3c 20 31 |item 1 o|f it < 1|
|00005880| 39 30 34 c2 0d 6f 72 20 | 69 74 65 6d 20 32 20 6f |904..or |item 2 o|
|00005890| 66 20 69 74 20 3e 20 31 | 32 20 6f 72 20 74 68 65 |f it > 1|2 or the|
|000058a0| 20 6e 75 6d 62 65 72 20 | 6f 66 20 69 74 65 6d 73 | number |of items|
|000058b0| 20 69 6e 20 69 74 20 3c | 20 37 20 74 68 65 6e 0d | in it <| 7 then.|
|000058c0| 61 73 6b 20 22 49 6e 76 | 61 6c 69 64 20 44 61 74 |ask "Inv|alid Dat|
|000058d0| 65 3b 20 55 73 65 20 4d | 6f 6e 74 68 4e 75 6d 2f |e; Use M|onthNum/|
|000058e0| 44 61 74 65 2f 32 2d 64 | 69 67 69 74 59 72 22 20 |Date/2-d|igitYr" |
|000058f0| 77 69 74 68 20 61 44 61 | 74 65 0d 70 75 74 20 69 |with aDa|te.put i|
|00005900| 74 20 69 6e 74 6f 20 61 | 44 61 74 65 0d 69 66 20 |t into a|Date.if |
|00005910| 69 74 20 69 73 20 65 6d | 70 74 79 20 74 68 65 6e |it is em|pty then|
|00005920| 20 65 78 69 74 20 72 65 | 70 65 61 74 0d 70 75 74 | exit re|peat.put|
|00005930| 20 66 61 6c 73 65 20 69 | 6e 74 6f 20 63 68 65 63 | false i|nto chec|
|00005940| 6b 0d 65 6e 64 20 69 66 | 0d 65 6e 64 20 72 65 70 |k.end if|.end rep|
|00005950| 65 61 74 0d 63 6f 6e 76 | 65 72 74 20 61 44 61 74 |eat.conv|ert aDat|
|00005960| 65 20 74 6f 20 73 68 6f | 72 74 20 64 61 74 65 0d |e to sho|rt date.|
|00005970| 72 65 74 75 72 6e 20 61 | 44 61 74 65 0d 65 6e 64 |return a|Date.end|
|00005980| 20 63 6b 44 61 74 65 0d | 0d 66 75 6e 63 74 69 6f | ckDate.|.functio|
|00005990| 6e 20 6e 75 6d 53 6c 61 | 73 68 20 61 72 67 0d 69 |n numSla|sh arg.i|
|000059a0| 66 20 61 72 67 20 69 73 | 20 65 6d 70 74 79 20 74 |f arg is| empty t|
|000059b0| 68 65 6e 20 72 65 74 75 | 72 6e 20 74 72 75 65 0d |hen retu|rn true.|
|000059c0| 72 65 70 65 61 74 20 77 | 69 74 68 20 63 20 3d 20 |repeat w|ith c = |
|000059d0| 31 20 74 6f 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |1 to the| number |
|000059e0| 6f 66 20 63 68 61 72 73 | 20 69 6e 20 61 72 67 0d |of chars| in arg.|
|000059f0| 69 66 20 63 68 61 72 20 | 63 20 6f 66 20 61 72 67 |if char |c of arg|
|00005a00| 20 69 73 20 6e 6f 74 20 | 69 6e 20 22 30 31 32 33 | is not |in "0123|
|00005a10| 34 35 36 37 38 39 2f 22 | 20 74 68 65 6e 20 72 65 |456789/"| then re|
|00005a20| 74 75 72 6e 20 66 61 6c | 73 65 0d 65 6e 64 20 72 |turn fal|se.end r|
|00005a30| 65 70 65 61 74 0d 72 65 | 74 75 72 6e 20 74 72 75 |epeat.re|turn tru|
|00005a40| 65 0d 65 6e 64 20 6e 75 | 6d 53 6c 61 73 68 00 00 |e.end nu|mSlash..|
|00005a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a60| 00 00 10 80 42 4d 41 50 | 00 00 0c 68 00 00 00 00 |....BMAP|...h....|
|00005a70| 00 00 00 00 00 01 00 00 | 00 00 00 00 01 56 02 00 |........|.....V..|
|00005a80| 00 00 00 00 01 56 02 00 | 00 00 00 00 01 56 02 00 |.....V..|.....V..|
|00005a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 10 24 |........|.......$|
|00005aa0| af 84 8c 10 80 e1 2e 3f | ff e1 1e ff 89 50 80 00 |.......?|.....P..|
|00005ab0| 0a aa 80 e1 2a 7a af e1 | 4b 80 00 01 aa 8a e1 2f |....*z..|K....../|
|00005ac0| 67 f3 e1 1e ff e1 2f 1b | ec e1 1e ff e1 2f 05 d0 |g...../.|...../..|
|00005ad0| e1 1e ff e1 2f 02 a0 e1 | 1e ff 89 50 80 30 0a aa |..../...|...P.0..|
|00005ae0| 80 e1 1b 80 e1 4b 80 00 | 01 55 50 80 30 0a aa 80 |.....K..|.UP.0...|
|00005af0| e1 1b 80 e1 4b 80 30 01 | aa 50 80 30 0a aa 80 e1 |....K.0.|.P.0....|
|00005b00| 1b 80 e1 4b 80 30 01 55 | 50 80 30 0a aa 80 e1 1b |...K.0.U|P.0.....|
|00005b10| 80 e1 4b 80 78 01 aa 50 | 80 30 0a aa 80 e1 1b 80 |..K.x..P|.0......|
|00005b20| e1 4b 80 78 01 55 50 80 | 30 0a aa 80 e1 1b 80 e1 |.K.x.UP.|0.......|
|00005b30| 4b 80 cc 01 aa 50 86 30 | 0a aa 80 e1 1b 80 e1 4b |K....P.0|.......K|
|00005b40| 80 cc 01 55 50 86 30 0a | aa 80 e1 1b 80 e1 4b 81 |...UP.0.|......K.|
|00005b50| fe 01 aa 50 83 e0 0a aa | 80 e1 1b 80 e1 4b 81 86 |...P....|.....K..|
|00005b60| 01 55 50 80 00 0a aa 80 | e1 1b 80 e1 4b 81 86 01 |.UP.....|....K...|
|00005b70| aa 50 80 00 0a aa 80 e1 | 1b 80 e1 4b 80 00 01 55 |.P......|...K...U|
|00005b80| 50 80 00 0a aa 80 e1 1b | 80 e1 4b 80 00 01 aa 50 |P.......|..K....P|
|00005b90| 80 60 0a aa 80 e1 1b 80 | e1 4b 80 00 01 55 50 80 |.`......|.K...UP.|
|00005ba0| 60 0a aa 80 e1 1b 80 e1 | 4b 81 8c 01 aa 50 80 f0 |`.......|K....P..|
|00005bb0| 0a aa 80 e1 1b 80 e1 4b | 81 8c 01 55 50 80 f0 0a |.......K|...UP...|
|00005bc0| aa 80 e1 1b 80 e1 4b 81 | 8c 01 aa 50 81 98 0a aa |......K.|...P....|
|00005bd0| 80 e1 1b 80 e1 4b 81 8c | 01 55 50 81 98 0a aa 80 |.....K..|.UP.....|
|00005be0| e1 1b 80 e1 4b 81 8c 01 | aa 50 83 fc 0a aa 80 e1 |....K...|.P......|
|00005bf0| 1b 80 e1 4b 81 8c 01 55 | 50 83 0c 0a aa 80 e1 1b |...K...U|P.......|
|00005c00| 80 e1 4b 81 8c 01 aa 50 | 83 0c 0a aa 80 e1 1b 80 |..K....P|........|
|00005c10| e1 4b 81 8c 01 55 50 80 | 00 0a aa 80 e1 1b 80 e1 |.K...UP.|........|
|00005c20| 4b 80 f8 01 aa 50 80 00 | 0a aa 80 e1 1b 80 e1 4b |K....P..|.......K|
|00005c30| 80 00 01 55 50 80 00 0a | aa 80 e1 1b 80 e1 4b 80 |...UP...|......K.|
|00005c40| 00 01 aa 50 83 98 0a aa | 80 e1 1b 80 e1 4b 80 00 |...P....|.....K..|
|00005c50| 01 55 50 83 98 0a aa 80 | e1 1b 80 e1 4b 80 f8 01 |.UP.....|....K...|
|00005c60| aa 50 83 d8 0a aa 80 e1 | 1b 80 e1 4b 81 8c 01 55 |.P......|...K...U|
|00005c70| 50 83 d8 0a aa 80 e1 1b | 80 e1 4b 81 80 01 aa 50 |P.......|..K....P|
|00005c80| 83 78 0a aa 80 e1 1b 80 | e1 4b 81 80 01 55 50 83 |.x......|.K...UP.|
|00005c90| 78 0a aa 80 e1 1b 80 e1 | 4b 81 bc 01 aa 50 83 38 |x.......|K....P.8|
|00005ca0| 0a aa 80 e1 1b 80 e1 4b | 81 8c 01 55 50 83 38 0a |.......K|...UP.8.|
|00005cb0| aa 80 e1 1b 80 e1 4b 81 | 8c 01 aa 50 83 18 0a aa |......K.|...P....|
|00005cc0| 80 e1 1b 80 e1 4b 81 8c | 01 55 50 80 00 0a aa 80 |.....K..|.UP.....|
|00005cd0| e1 1b 80 e1 4b 80 f8 01 | aa 50 80 00 0a aa 80 e1 |....K...|.P......|
|00005ce0| 1b 80 e1 4b 80 00 01 55 | 50 80 00 0a aa 80 e1 1b |...K...U|P.......|
|00005cf0| 80 e1 4b 80 00 01 aa a2 | 86 50 ff ff fe aa 80 e1 |..K.....|.P......|
|00005d00| 1b 80 e1 4b 80 00 01 55 | 50 40 00 02 aa 80 e1 1b |...K...U|P@......|
|00005d10| 80 e1 4b 80 00 01 aa 50 | c0 00 02 aa 80 e1 1b 80 |..K....P|........|
|00005d20| e1 4b ff ff ff d5 50 40 | 00 02 aa 80 e1 1b 80 e1 |.K....P@|........|
|00005d30| 1b a0 12 6a 50 c0 00 02 | aa 80 e1 1b 80 e1 1b a0 |...jP...|........|
|00005d40| 12 55 86 50 c0 fc 02 aa | 80 e1 1b 80 e1 1b a0 12 |.U.P....|........|
|00005d50| 55 50 40 c0 02 aa 80 e1 | 1b 80 e1 1b a0 12 6a 50 |UP@.....|......jP|
|00005d60| c0 c0 02 aa 80 e1 1b 80 | e1 4b a0 3e 00 55 50 40 |........|.K.>.UP@|
|00005d70| c0 02 aa 80 e1 1b 80 e1 | 4b a0 63 00 6a 50 c0 f8 |........|K.c.jP..|
|00005d80| 02 aa 80 e1 1b 80 e1 4b | a0 60 00 55 50 40 c0 02 |.......K|.`.UP@..|
|00005d90| aa 80 e1 1b 80 e1 4b a0 | 60 00 6a 50 c0 c0 02 aa |......K.|`.jP....|
|00005da0| 80 e1 1b 80 e1 4b a0 3e | 00 55 50 40 c0 02 aa 80 |.....K.>|.UP@....|
|00005db0| e1 1b 80 e1 4b a0 03 00 | 6a 50 c0 c0 02 aa 80 e1 |....K...|jP......|
|00005dc0| 1b 80 e1 4b a0 03 00 55 | 50 40 00 02 aa 80 e1 1b |...K...U|P@......|
|00005dd0| 80 e1 4b a0 63 00 6a 50 | c0 00 02 aa 80 e1 1b 80 |..K.c.jP|........|
|00005de0| e1 4b a0 3e 00 55 50 40 | 00 02 aa 80 e1 1b 80 e1 |.K.>.UP@|........|
|00005df0| 1b a0 12 6a 50 c0 fc 02 | aa 80 e1 1b 80 e1 1b a0 |...jP...|........|
|00005e00| 12 55 50 40 c0 02 aa 80 | e1 1b 80 e1 1b a0 12 6a |.UP@....|.......j|
|00005e10| 50 c0 c0 02 aa 80 e1 1b | 80 e1 4b a0 7e 00 55 50 |P.......|..K.~.UP|
|00005e20| 40 c0 02 aa 80 e1 1b 80 | e1 4b a0 60 00 6a 50 c0 |@.......|.K.`.jP.|
|00005e30| f8 02 aa 80 e1 1b 80 e1 | 4b a0 60 00 55 86 50 c0 |........|K.`.U.P.|
|00005e40| c0 02 aa 80 e1 1b 80 e1 | 4b a0 7c 00 55 86 50 c0 |........|K.|.U.P.|
|00005e50| fc 02 aa 80 e1 1b 80 e1 | 4b a0 60 00 55 50 40 00 |........|K.`.UP@.|
|00005e60| 02 aa 80 e1 1b 80 e1 4b | a0 60 00 6a 50 c0 00 02 |.......K|.`.jP...|
|00005e70| aa 80 e1 1b 80 e1 4b a0 | 7e 00 55 50 40 00 02 aa |......K.|~.UP@...|
|00005e80| 80 e1 1b 80 e1 1b a0 12 | 6a 50 c0 fc 02 aa 80 e1 |........|jP......|
|00005e90| 1b 80 e1 1b a0 12 55 50 | 40 c6 02 aa 80 e1 1b 80 |......UP|@.......|
|00005ea0| e1 1b a0 12 6a 50 c0 c6 | 02 aa 80 e1 1b 80 e1 4b |....jP..|.......K|
|00005eb0| a0 7e 00 55 50 40 fc 02 | aa 80 e1 1b 80 e1 4b a0 |.~.UP@..|......K.|
|00005ec0| 63 00 6a 50 c0 c6 02 aa | 80 e1 1b 80 e1 4b a0 63 |c.jP....|.....K.c|
|00005ed0| 00 55 50 40 c6 02 aa 80 | e1 1b 80 e1 4b a0 63 00 |.UP@....|....K.c.|
|00005ee0| 6a 50 c0 c6 02 aa 80 e1 | 1b 80 e1 4b a0 7e 00 55 |jP......|...K.~.U|
|00005ef0| 50 40 c6 02 aa 80 e1 1b | 80 e1 4b a0 60 00 6a 50 |P@......|..K.`.jP|
|00005f00| c0 fc 02 aa 80 e1 1b 80 | e1 4b a0 60 00 55 50 40 |........|.K.`.UP@|
|00005f10| 00 02 aa 80 e1 1b 80 e1 | 4b a0 60 00 6a 50 c0 00 |........|K.`.jP..|
|00005f20| 02 aa 80 e1 1b 80 e1 4b | a0 60 00 55 50 40 00 02 |.......K|.`.UP@..|
|00005f30| aa 80 e1 1b 80 e1 1b a0 | 12 6a 50 c0 00 02 aa 80 |........|.jP.....|
|00005f40| e1 1b 80 e1 1b a0 12 55 | 86 50 ff ff ff aa 80 e1 |.......U|.P......|
|00005f50| 1b 80 e1 1b a0 12 55 10 | 50 22 aa 80 e1 1b 80 e1 |......U.|P"......|
|00005f60| 1b a0 12 6a 10 b0 22 aa | 80 e1 1b 80 e1 1b a0 12 |...j..".|........|
|00005f70| 55 86 10 b0 22 aa 80 e1 | 1b 80 e1 4b bf ff ff f5 |U..."...|...K....|
|00005f80| 10 50 22 aa 80 e1 1b 80 | e1 1b a8 12 1a 50 b0 30 |.P".....|.....P.0|
|00005f90| c0 aa 80 e1 1b 80 e1 1b | a8 12 15 50 50 39 c0 aa |........|...PP9..|
|00005fa0| 80 e1 1b 80 e1 1b a8 12 | 1a 50 b0 3f c0 aa 80 e1 |........|.P.?....|
|00005fb0| 1b 80 e1 1b a8 12 15 50 | 50 36 c0 aa 80 e1 1b 80 |.......P|P6......|
|00005fc0| e1 1b a8 12 1a 50 b0 30 | c0 aa 80 e1 1b 80 e1 4b |.....P.0|.......K|
|00005fd0| a8 0f 80 15 50 50 30 c0 | aa 80 e1 1b 80 e1 4b a8 |....PP0.|......K.|
|00005fe0| 18 c0 1a 50 b0 30 c0 aa | 80 e1 1b 80 e1 4b a8 18 |...P.0..|.....K..|
|00005ff0| c0 15 a2 86 10 50 22 aa | 80 e1 1b 80 e1 4b a8 18 |.....P".|.....K..|
|00006000| c0 1a 10 b0 22 aa 80 e1 | 1b 80 e1 4b a8 18 c0 15 |...."...|...K....|
|00006010| 86 50 b0 06 00 aa 80 e1 | 1b 80 e1 4b a8 0f 80 15 |.P......|...K....|
|00006020| 50 50 06 00 aa 80 e1 1b | 80 e1 1b a8 12 1a 50 b0 |PP......|......P.|
|00006030| 0f 00 aa 80 e1 1b 80 e1 | 1b a8 12 15 50 50 0f 00 |........|....PP..|
|00006040| aa 80 e1 1b 80 e1 1b a8 | 12 1a 50 b0 19 80 aa 80 |........|..P.....|
|00006050| e1 1b 80 e1 4b a8 0f 80 | 15 50 50 19 80 aa 80 e1 |....K...|.PP.....|
|00006060| 1b 80 e1 4b a8 18 c0 1a | 50 b0 3f c0 aa 80 e1 1b |...K....|P.?.....|
|00006070| 80 e1 4b a8 18 00 15 50 | 50 30 c0 aa 80 e1 1b 80 |..K....P|P0......|
|00006080| e1 4b a8 18 00 1a 50 b0 | 30 c0 aa 80 e1 1b 80 e1 |.K....P.|0.......|
|00006090| 4b a8 18 00 15 10 50 22 | aa 80 e1 1b 80 e1 4b a8 |K.....P"|......K.|
|000060a0| 18 00 1a 10 b0 22 aa 80 | e1 1b 80 e1 4b a8 18 00 |....."..|....K...|
|000060b0| 15 10 50 22 aa 80 e1 1b | 80 e1 4b a8 18 c0 1a 50 |..P"....|..K....P|
|000060c0| b0 3f 00 aa 80 e1 1b 80 | e1 4b a8 0f 80 15 50 50 |.?......|.K....PP|
|000060d0| 31 80 aa 80 e1 1b 80 e1 | 1b a8 12 1a 50 b0 31 80 |1.......|....P.1.|
|000060e0| aa 80 e1 1b 80 e1 1b a8 | 12 15 86 50 b0 3f 00 aa |........|...P.?..|
|000060f0| 80 e1 1b 80 e1 4b a8 3f | c0 15 50 50 3c 00 aa 80 |.....K.?|..PP<...|
|00006100| e1 1b 80 e1 4b a8 06 00 | 1a 50 b0 36 00 aa 80 e1 |....K...|.P.6....|
|00006110| 1b 80 e1 4b a8 06 00 15 | 50 50 33 00 aa 80 e1 1b |...K....|PP3.....|
|00006120| 80 e1 4b a8 06 00 1a 50 | b0 31 80 aa 80 e1 1b 80 |..K....P|.1......|
|00006130| e1 4b a8 06 00 15 10 50 | 22 aa 80 e1 1b 80 e1 4b |.K.....P|"......K|
|00006140| a8 06 00 1a 10 b0 22 aa | 80 e1 1b 80 e1 4b a8 06 |......".|.....K..|
|00006150| 00 15 a2 86 10 50 22 aa | 80 e1 1b 80 e1 1b a8 12 |.....P".|........|
|00006160| 1a 50 bf ff ff ea 80 e1 | 1b 80 e1 1b a8 12 15 10 |.P......|........|
|00006170| 54 22 2a 80 e1 1b 80 e1 | 1b a8 12 1a 10 ac 22 2a |T"*.....|......"*|
|00006180| 80 e1 1b 80 e1 1b a8 12 | 15 a3 86 50 ac 01 80 2a |........|...P...*|
|00006190| 80 e1 1b 80 e1 4b af ff | ff fd 50 54 01 80 2a 80 |.....K..|..PT..*.|
|000061a0| e1 1b 80 e1 1b aa 12 0a | 50 ac 03 c0 2a 80 e1 1b |........|P...*...|
|000061b0| 80 e1 1b aa 12 0d 50 54 | 03 c0 2a 80 e1 1b 80 e1 |......PT|..*.....|
|000061c0| 1b aa 12 0a 50 ac 06 60 | 2a 80 e1 1b 80 e1 1b aa |....P..`|*.......|
|000061d0| 12 0d 50 54 06 60 2a 80 | e1 1b 80 e1 1b aa 12 0a |..PT.`*.|........|
|000061e0| 50 ac 0f f0 2a 80 e1 1b | 80 e1 1b aa 12 0d 50 54 |P...*...|......PT|
|000061f0| 0c 30 2a 80 e1 1b 80 e1 | 4b aa 07 30 0a 50 ac 0c |.0*.....|K..0.P..|
|00006200| 30 2a 80 e1 1b 80 e1 4b | aa 07 30 0d 10 54 22 2a |0*.....K|..0..T"*|
|00006210| 80 e1 1b 80 e1 4b aa 07 | b0 0a 10 ac 22 2a 80 e1 |.....K..|...."*..|
|00006220| 1b 80 e1 4b aa 07 b0 0d | 10 54 22 2a 80 e1 1b 80 |...K....|.T"*....|
|00006230| e1 4b aa 06 f0 0a 50 ac | 0f c0 2a 80 e1 1b 80 e1 |.K....P.|..*.....|
|00006240| 4b aa 06 f0 0d 50 54 0c | 60 2a 80 e1 1b 80 e1 4b |K....PT.|`*.....K|
|00006250| aa 06 70 0a 50 ac 0c 60 | 2a 80 e1 1b 80 e1 4b aa |..p.P..`|*.....K.|
|00006260| 06 70 0d 50 54 0c 60 2a | 80 e1 1b 80 e1 4b aa 06 |.p.PT.`*|.....K..|
|00006270| 30 0a 50 ac 0f c0 2a 80 | e1 1b 80 e1 1b aa 12 0d |0.P...*.|........|
|00006280| 50 54 0c 00 2a 80 e1 1b | 80 e1 1b aa 12 0a 50 ac |PT..*...|......P.|
|00006290| 0c 00 2a 80 e1 1b 80 e1 | 1b aa 12 0d 50 54 0c 00 |..*.....|....PT..|
|000062a0| 2a 80 e1 1b 80 e1 4b aa | 03 e0 0a 50 ac 0c 00 2a |*.....K.|...P...*|
|000062b0| 80 e1 1b 80 e1 4b aa 06 | 30 0d 10 54 22 2a 80 e1 |.....K..|0..T"*..|
|000062c0| 1b 80 e1 4b aa 06 30 0a | 10 54 22 2a 80 e1 1b 80 |...K..0.|.T"*....|
|000062d0| e1 4b aa 06 30 0d 10 ac | 22 2a 80 e1 1b 80 e1 4b |.K..0...|"*.....K|
|000062e0| aa 06 30 0a 50 54 0f c0 | 2a 80 e1 1b 80 e1 4b aa |..0.PT..|*.....K.|
|000062f0| 06 30 0d 50 ac 0c 60 2a | 80 e1 1b 80 e1 4b aa 06 |.0.P..`*|.....K..|
|00006300| 30 0a 50 54 0c 60 2a 80 | e1 1b 80 e1 4b aa 06 30 |0.PT.`*.|....K..0|
|00006310| 0d 50 ac 0c 60 2a 80 e1 | 1b 80 e1 4b aa 03 e0 0a |.P..`*..|...K....|
|00006320| 50 54 0f c0 2a 80 e1 1b | 80 e1 1b aa 12 0d 50 ac |PT..*...|......P.|
|00006330| 0f 00 2a 80 e1 1b 80 e1 | 1b aa 12 0a 50 54 0d 80 |..*.....|....PT..|
|00006340| 2a 80 e1 1b 80 e1 1b aa | 12 0d 50 ac 0c c0 2a 80 |*.......|..P...*.|
|00006350| e1 1b 80 e1 4b aa 06 18 | 0a 50 54 0c 60 2a 80 e1 |....K...|.PT.`*..|
|00006360| 1b 80 e1 4b aa 06 18 0d | 10 ac 22 2a 80 e1 1b 80 |...K....|.."*....|
|00006370| e1 4b aa 06 18 0a 10 54 | 22 2a 80 e1 1b 80 e1 4b |.K.....T|"*.....K|
|00006380| aa 03 30 0d 10 ac 22 2a | 80 e1 1b 80 e1 4b aa 03 |..0..."*|.....K..|
|00006390| 30 0a 10 54 22 2a 80 e1 | 1b 80 e1 4b aa 01 e0 0d |0..T"*..|...K....|
|000063a0| 10 ac 22 2a 80 e1 1b 80 | e1 4b aa 01 e0 0a 50 57 |.."*....|.K....PW|
|000063b0| ff ff fa 80 e1 1b 80 e1 | 4b aa 00 c0 0d 10 ab 22 |........|K......"|
|000063c0| 0a 80 e1 1b 80 e1 4b aa | 00 c0 0a 10 55 22 0a 80 |......K.|....U"..|
|000063d0| e1 1b 80 e1 1b aa 12 0d | 10 ab 22 0a 80 e1 1b 80 |........|..".....|
|000063e0| e1 1b aa 12 0a 86 50 ab | 03 0c 0a 80 e1 1b 80 e1 |......P.|........|
|000063f0| 1b aa 12 0a 50 55 03 9c | 0a 80 e1 1b 80 e1 1b aa |....PU..|........|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.